Предмет: Информатика,
автор: yutkinaleks
Program Primer;
var a, s: integer;
begin
s:= 0;
readln(a);
while a<>0 do begin
if (a mod 6 = 0) or (a mod 10 = 6) then
s:=s+a;
readln(a);
end;
writeln(s);
end.
Какое число получится, если ввести ряд чисел 46, 12, 16, 66, 11, 0?
Ответы
Автор ответа:
0
Ответ:
128
Объяснение:
Похожие вопросы
Предмет: Литература,
автор: nurzhamalkokberlova
Предмет: История,
автор: mirlan010110011010
Предмет: Алгебра,
автор: vikapivneva92
Предмет: Математика,
автор: efimalmazov
Предмет: Музыка,
автор: gusakovaevgenia743