Предмет: Информатика,
автор: akatorgina180
Задано 5 чисел. Вычислить их сумму и проверить, является ли она числом, большим 100.
цикл пожалуйста..
romadirsha:
На паскале?
Ответы
Автор ответа:
3
Объяснение:
program s5;
var a:array[1..5] of integer;
i,s:integer;
begin
for i:=1 to 5 do
begin
readln(a [ i ]);
s:=s+a [ i ];
end
writeln('s=',s);
end.
Интересные вопросы
Предмет: Английский язык,
автор: aastapkovich
Предмет: Окружающий мир,
автор: МарьянаПолтарацкая
Предмет: Английский язык,
автор: Queen2022
Предмет: Русский язык,
автор: kalkulator007