Есть ответ 👍

3. Что будет на экране при выполнении этого фрагмента?
Begin
for i:=5 to 10 do
If i mod 5=0
Then write " ,i);
end.​

275
353
Посмотреть ответы 1

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


Procedure num ( x: integer ); var s: string; i: integer; begin s : = inttostr(x); for i : = 1 to length(s) do writeln( i, ' цифра: ', s[i] ); end; var numeric: integer; begin write('введите число: '); readln(numeric); num(numeric); end.

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