Ответы
Ответ дал:
0
Вопрос:
На паскале писать?
Ответ: Проверь сперва
var
a, s: integer;
begin
s := 0;
repeat
writeln('Введите число: ');
read(a);
if (a mod 3 = 0) and (a mod 10 = 9)
then s += a;
until a = 0;
writeln('Сумма: ', s);
end.
Ответ дал:
0
На Паскале.И здесь нет проверки от неверных чисел
Ответ дал:
0
Защиты*
Вас заинтересует
2 года назад
2 года назад
3 года назад
8 лет назад
9 лет назад