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

а), б)

var a, b, c: char;

begin

  writeln('Введите 3 символа');

  readln(a, b, c);

  writeln('Результат сцепления: ', a+b+c);

  if a>b then writeln(a,'>', b);

  if a>c then writeln(a,'>', c);

  if a=b then writeln(a, '=', b);

  if a=c then writeln(a, '=', c);

  if a<b then writeln(a, '<', b);

  if a<c then writeln(a, '<', c);

  if b>c then writeln(b, '>', c);

  if b<c then writeln(b, '<', c);

end.

в)

var a, b: char;

begin

  writeln('Введите 2 символа');

  readln(a, b);

  if a>b then writeln(b,'  ', a);

  if a<b then writeln(a,'  ', b);

  if a=b then writeln(a,'  ', b);

end.

Составить алгоритм нахождения произведения целых нечетных чисел от 1 до 100.

Извини, я на украинском не могу)

Буду приводить аналогию на паскале.

В основе будет лежать "двойной" цикл. (for i:=1 to 100 do for j:=1 to 100 do...)

В первом цикле мы проверяем делится ли "i" на 2 (If i mod 2=0).

Если да(четное), тогда берем след число. Если нет(нечет), то запускаем второй цикл:

(For J:=1 to 100)

В нем мы тоже проверяем число на нечетность. Если число нечетное, тогда у нас есть уже 1ое произведение! "i" - Это первый множитель. "j" - второй. i*j - само произведение. Его можно вывести на экран (writeln(i*j)).

Получается мы берем по-порядку каждое число от 1 до 100,  если оно нечетное, тогда по очереди умножаем его на каждое нечетное число, опять же, от 1 до 100.

На паскале:

For i:=1 to 100 do

 If i mod 2<>0 then

 for j:=1 to 100 do

   if j mod 2<>0 then writeln(i*j);

Могут встречаться повторы (3*9 и 9*3)