Есть ответ 👍

Дано натуральное число. записать число, записанное теми же цифрами, но в обратном порядке. подсказка последовательно отделяемое каждую цифру, потом ее значение прибавляем к переменной s, умноженной на 10.

176
181
Посмотреть ответы 2

Ответы на вопрос:

26nn
4,5(38 оценок)

Pascal abc program perevod; uses crt; var    a,i,error: integer; s,d: string; begin   write( 'введите число: ');   readln(a);   str(a,s);   for i: =1 to length(s) do d: =s[i]+d;   val (d,a,error);   write( 'ответ: ',a); end.

pascalabc.net

begin

  var a : = readseqintegerwhile(p -> p < > 0).toarray;

  a.count(p -> (p mod 5 = 0) or (p mod 9 =

end.

Популярно: Информатика