2сделать на паскале 1) с клавиатуры вводится последовательность чисел до тех пор пока не будет введено число 0. требуется найти количество чисел во введенной последовательности, оканчивающихся на цифру 7. 2) дано целое число n. выяснить, есть ли в записи этого числа хотя бы одна пара одинаковых подряд идущих цифр. например, для числа 3221 - ответ положительный, для числа 121 - ответ отрицательный

VeronikaIvanova555 VeronikaIvanova555    3   07.06.2019 08:40    1

Ответы
timondrob timondrob  07.07.2020 06:55
1) var i,x:integer;
begin
i:=1;
while i<>0 do
begin
readln(i);
if i mod 10 = 7 then x:=x+1;
end;
write(x);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика