Как только условие становится ложным, управление переходит к следующему оператору.
Тело цикла
i < 5
i < 10
i > 6
i >= 0
5 раз
10 раз
Ни разу
бесконечность
Программа будет использовать ввод (слагаемые – числа необходимо вводить с клавиатуры)
Программа будет использовать вывод (сумма – результат работы должен быть выведен на экран монитора)
Программа использует цикл (часть программы повторяется несколько раз: запрос, суммирование, проверка)
4. Суммировать в сумматор
1. Проверить слагаемое на равенство 0 (т.е. Признак окончания суммирования)
Вывести результат на экран PC
Решение:
Read (A);
S:=S+A;
end;
Write (‘Summa=‘,S );
End.
:2:2
Ln
Program Summa ;
uses CRT;
Var A,S:Real;
Begin
clrscr;
S:=0;
repeat
write ('Введите А=');
read (A);
S:=S+A;
until A=0;
write ('Сумма чисел =',S);
end.
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть