Регистрация
БПД
26.12.2021 11:42
Информатика
Есть ответ 👍

Дано натуральное число. заменить все 7 в данном числе цифрами 8 (через mod) через паскаль !

258
458
Посмотреть ответы 2

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

СлюсаревИван
СлюсаревИван
4,6(45 оценок)
Program z1;   var n,d,s,l: integer;   begin  write('введите число = '); readln(n);   l: = 1;   s: = 0;   while n > 0 do  begin    d: =n mod 10;     if (d = 7) then d: =8;     d: = d * l;     s: = s + d;     l: = l * 10;     n: = n div 10;   end;   writeln(s); end.
anastasiabojko5
anastasiabojko5
4,8(51 оценок)
7дев.3мальчик; 6дев.4мальчик; 5дев.5мальчик; 4дев.6мальчик; 3дев.7мальчик.5 способами можно набрать футбольную каманду!

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