Предмет: Информатика,
автор: LisaRice
помогите сделать задание 3 и 4!) Нужно написать программу на Exel.
Приложения:
Ответы
Автор ответа:
0
Извини конечно но это с паскалем можно решить только. вот если что
4)
var a, s: integer;
begina:=1;
while a<>0 do begin
read(a);
if (a mod 3 = 0)and(a<>0) then s:=s+1;
end;
writeln(s);
end.
4)
var a, s: integer;
begina:=1;
while a<>0 do begin
read(a);
if (a mod 3 = 0)and(a<>0) then s:=s+1;
end;
writeln(s);
end.
Автор ответа:
0
это какое?
Автор ответа:
0
Язык программирования? Паскаль
Автор ответа:
0
задача №4
Похожие вопросы
Предмет: Физика,
автор: Nastya23092007
Предмет: Русский язык,
автор: pelmen5138
Предмет: Английский язык,
автор: varyakolodc
Предмет: Математика,
автор: rodion123war
Предмет: Математика,
автор: zakasova1303