Запиши математическое выражение (14+t)2 на языке Паскаль. (При записи ответа используй прописные буквы).

0 -17,77777778 1 -17,22222222 2 -16,66666667 3 -16,11111111 4 -15,55555556 5 -15 6 -14,44444444 7 -13,88888889 8 -13,33333333 9 -12,77777778 10 -12,22222222 11 -11,66666667 12 -11,11111111 13 -10,55555556 14 -10 15 -9,444444444 16 -8,888888889 17 -8,333333333 18 -7,777777778 19 -7,222222222 20 -6,666666667 21 -6,111111111 22 -5,555555556 23 -5 24 -4,444444444 25 -3,888888889 26 -3,333333333 27 -2,777777778 28 -2,222222222 29 -1,666666667 30 -1,111111111 31 -0,555555556 32 0 33 0,555555556 34 1,111111111 35 1,666666667 36 2,222222222 37 2,777777778 38 3,333333333 39 3,888888889 40 4,444444444 41 5 42 5,555555556 43 6,111111111 44 6,666666667 45 7,222222222 46 7,777777778 47 8,333333333 48 8,888888889 49 9,444444444 50 10 51 10,55555556 52 11,11111111 53 11,66666667 54 12,22222222 55 12,77777778 56 13,33333333 57 13,88888889 58 14,44444444 59 15 60 15,55555556 61 16,11111111 62 16,66666667 63 17,22222222 64 17,77777778 65 18,33333333 66 18,88888889 67 19,44444444 68 20 69 20,55555556 70 21,11111111 71 21,66666667 72 22,22222222 73 22,77777778 74 23,33333333 75 23,88888889 76 24,44444444 77 25 78 25,55555556 79 26,11111111 80 26,66666667 81 27,22222222 82 27,77777778 83 28,33333333 84 28,88888889 85 29,44444444 86 30 87 30,55555556 88 31,11111111 89 31,66666667 90 32,22222222 91 32,77777778 92 33,33333333 93 33,88888889 94 34,44444444 95 35 96 35,55555556 97 36,11111111 98 36,66666667 99 37,22222222 100 37,77777778 101 38,33333333 102 38,88888889 103 39,44444444 104 40 105 40,55555556 106 41,11111111 107 41,66666667 108 42,22222222 109 42,77777778 110 43,33333333 111 43,88888889 112 44,44444444 113 45 114 45,55555556 115 46,11111111 116 46,66666667 117 47,22222222 118 47,77777778 119 48,33333333 120 48,88888889 121 49,44444444 122 50 123 50,55555556 124 51,11111111 125 51,66666667 126 52,22222222 127 52,77777778 128 53,33333333 129 53,88888889 130 54,44444444 131 55 132 55,55555556 133 56,11111111 134 56,66666667 135 57,22222222 136 57,77777778 137 58,33333333 138 58,88888889 139 59,44444444 140 60 141 60,55555556 142 61,11111111 143 61,66666667 144 62,22222222 145 62,77777778 146 63,33333333 147 63,88888889 148 64,44444444 149 65 150 65,55555556 151 66,11111111 152 66,66666667 153 67,22222222 154 67,77777778 155 68,33333333 156 68,88888889 157 69,44444444 158 70 159 70,55555556 160 71,11111111 161 71,66666667 162 72,22222222 163 72,77777778 164 73,33333333 165 73,88888889 166 74,44444444 167 75 168 75,55555556 169 76,11111111 170 76,66666667 171 77,22222222 172 77,77777778 173 78,33333333 174 78,88888889 175 79,44444444 176 80 177 80,55555556 178 81,11111111 179 81,66666667 180 82,22222222 181 82,77777778 182 83,33333333 183 83,88888889 184 84,44444444 185 85 186 85,55555556 187 86,11111111 188 86,66666667 189 87,22222222 190 87,77777778 191 88,33333333 192 88,88888889 193 89,44444444 194 90 195 90,55555556 196 91,11111111 197 91,66666667 198 92,22222222 199 92,77777778 200 93,33333333

Объяснение:

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

type
  Ex211a=class
 
  public
 
  constructor(fio,phone:string);
  begin
    var n:=Max(fio.Length,phone.Length);
    Writeln((n+2)*'*');
    Writeln('*',fio.PadRight(n),'*',NewLine,'*',phone.PadRight(n),'*');
    Writeln((n+2)*'*')
  end;
end;

type
  Ex211b=class
 
  public
 
  constructor;
  begin
    var n:=ReadInteger('Введите целое число:');
    Writeln('Результат равен ',n+10)
  end;
end;

begin
  new Ex211a('Иван Иванов','7-841-2666666');
  new Ex211b
end.

Пример

*Иван Иванов  *
*7-841-2666666*

Введите целое число: 18
Результат равен 28