Регистрация
папа1231
18.05.2021 10:16
Информатика
Есть ответ 👍

Напишите программу через цикл repeat. Дано натуральное число n найти количество цифр в десятичной записи числа.​

186
269
Посмотреть ответы 1

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

прррррррррррррря
прррррррррррррря
4,7(54 оценок)

program pr; uses crt; var i,j,b: integer; c: array[1..5, 1..5] of integer; beginfor i: =1 to 5 do beginwriteln;       for j: =1 to 5 do begin c[i,j]: =random(100); write(c[i,j],'|');   end;         end; for i: =1 to 5 do        begin                    b: =c[i,i];                     c[i,i]: =c[i,6-i];                     c[i,6-i]: =b;           end; writeln;           for i: =1 to 5 do beginwriteln;       for j: =1 to 5 do  write(c[i,j],'|');         end;           readln; end.

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