95

Составьте программу вычисляющую, сумму квадратов чисел от 1 до n,

ddimm 27 февраля 2023

Составьте программу вычисляющую, сумму квадратов чисел от 1 до n, (n- вводится с клавиатуры) если n-четное, и сумму кубов чисел от 1 до n, еслиn-нечетное. Использовать цикл WHILE

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

69

program name; var i,n,x,summa,count: integer; nechet: boolean; beginWriteln ('Vvedite n: '); readln (n); //получаем nsumma: =0; count: =0; i: =1; if (n mod 2=1) then nechet: =true else nechet: =false; //проверяем четное число или нетwhile i

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

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