На вход программе подаётся последовательность натуральных чисел. признак конца ввода – ноль. напишите программу, которая находит сумму чисел, которые делятся на 13 и последняя цифра которых равна 7. числа не превосходят 10000. массивы не использовать.

165

479

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

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

Teddy62711

Информатика

4,5(61 оценок)

var a,b,c,d: integer;

begin

writeln('введите 4 числа');

readln(a,b,c,d);

if (a=0)or(b=0)or(c=0)or(d=0)

then writeln('среди введенных чисел есть 0')

else writeln('0 нет');

end.

пример:

введите 4 числа

5 0 3 7

среди введенных чисел есть 0

150 000+ пользователей

Оформить подписку