Регистрация
Cherep666
21.02.2021 09:21
Информатика
Есть ответ 👍

Как добавлять эффекты анимации,,? ​

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

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

fomicheva3ket
fomicheva3ket
4,7(75 оценок)

ответ:

var sum, num: integer;

begin

    readln(num);

   

    while (num < > 0) do

    begin

        if ((num mod 7 = 0) and (num mod 10 = 3)) then sum : = sum + num;

        readln(num);

    end;

   

    writeln(sum);

end.

объяснение:

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