Паскаль: Дана последовательность целых положительных чисел, заканчивающаяся числом, разряд единиц которого равен нулю. Определите, сколько чисел в последовательности, не считая данного числа.
Ответы
Ответ дал:
0
vari, a: longint;beginread(a);i := 1;while (a mod 10 <> 0) doinc(i);writeln('Чисел в последовательности: ', i);end.
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
9 лет назад