СРОЧНО, ОЧЕНЬ СРОЧНО
ПОМОГИТЕ, УМОЛЯЮ, ОЧЕНЬ НУЖНО!!!! НУЖНО СОСТАВИТЬ АЛГОРИТМ ( ЦИКЛ) ПАСКАЛЬ, ПОМОГИТЕ, ПРОШУ
Приложения:
Ответы на вопрос
Ответил vimmortal2
1
Программа:
Pascal:
var
n, i, s, chislo: integer;
begin
write('n = '); readln(n);
for i := 1 to n do begin
readln(chislo);
if chislo < 4 then s := s + chislo;
end;
writeln(s);
end.
С клавиатуры вводятся n чисел. Найти сумму тех чисел, которые меньше 4.
jggkjvhvhvh:
Спасибо!!!!!
Новые вопросы
Английский язык,
1 год назад
Русский язык,
1 год назад
Немецкий язык,
6 лет назад
Алгебра,
8 лет назад
Математика,
8 лет назад