72

Напишите пожалуйста программу с помщью Паскаля: Дана последовательность 5 9 13 17 21…

11 марта 2023

Напишите пожалуйста программу с помщью Паскаля: Дана последовательность 5 9 13 17 21 25 29 33 37 41 45 49. Составьте программу для подсчета числаслагаемых сумма которых равна 324

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



80

var sum, i: integer; begin sum: =5; i: =1; while (sum < 324) do begin sum: =sum+4; i: =i+1; end; writeln ('Слогаемых: '); write (i); end.

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


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