40

РЕШИТЬ ПРИ ПОМОЩЬ ОПЕРАТОРА ЦИКЛА for! Вычислить сумму Z=1+2+3+…. Вычисления…

04 марта 2023

РЕШИТЬ ПРИ ПОМОЩЬ ОПЕРАТОРА ЦИКЛА for! Вычислить сумму Z=1+2+3+…. Вычисления прекратить, когда значение Zпревыситзаданное значение A.

категория: информатика



43

Program Program1; Vari,z,a: integer; beginwrite ('Введите значение A: '); readln (a); z: =0; for i: =1 to 1000 dobeginz: =z+i; if z>a then break; end; writeln ('Z=',z); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...