Вход
Регистрация
О проекте Как заработать?
95

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

ddimm 29 марта 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

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
dykalis
29 марта 2023
1
ответ
Класс 2 часть стр. 38 задание 10. ЗАРАНИЕ ОГРОМНОЕ СПАСИБО! У каких предметов или существ могут быть такие отличительные признаки? (запиши как можнобольше названий рядом с каждым признаком) ЦВЕТ ВКУс СКОРОСТЬ ДЛИНА МАТЕРИАЛ РОСТ ФОРМА ВОЗРАСТ ОКРАС ВЫСОТА ВЕС ПОРОДА
bzhukovaa
29 марта 2023
1
ответ
Для какого из приведенных названий ложно высказываниеколичество букв четное) или (последняя буква гласная)? 1) Москва 2) Омск 3) Дубна 4) Новокузнецк
ivan85
29 марта 2023
1
ответ
Устройство вода информации? Что такое клавиатура?
koton
29 марта 2023
1
ответ
— Определить, начинается ли число на цифру 7 В паскале!
grenary-stouns
29 марта 2023
1
ответ
Необходимо составить рассказ на одну из тем: 1) Сны старого монитора 2) Воспоминания старой клавиатуры 3) Записки старого принтера
sarahdonnavan
29 марта 2023
1
ответ
Какую клавишу нужно нажать, чтобы зафиксировался режим ввода/вывода прописных букв? Плзпомогите!
imar
29 марта 2023
1
ответ
Оформите в виде процедур алгоритмы рисования букв М И Р. Составьте алгоритмы рисования слов МИР РИМ МИМ (7 класс)
openup
29 марта 2023
1
ответ
3. Перевести число 344 из десятичной системы счисления в двоичную. 4. Перевести число 936 из десятичной системы счисления в шестнадцатиричную.
burunduk
29 марта 2023
1
ответ
Вычислите сколько байтов занимает на CD одна минута звукозаписи (частота жискретизации — 44000, рязрядность — 16 битов). Какова максимальнаяпродолжительность звукозаписи на диске емкостью 700 МБ?
Задайте свой вопрос

ПОПУЛЯРНОЕ
dykalis, 29 марта 2023
Класс 2 часть стр. 38 задание 10. ЗАРАНИЕ ОГРОМНОЕ СПАСИБО!
bzhukovaa, 29 марта 2023
Для какого из приведенных названий ложно высказываниеколичество букв четное) или (последняя буква гласная)?
ivan85, 29 марта 2023
Устройство вода информации? Что такое клавиатура?
koton, 29 марта 2023
— Определить, начинается ли число на цифру 7 В паскале!
grenary-stouns, 29 марта 2023
Необходимо составить рассказ на одну из тем: 1) Сны старого монитора 2) Воспоминания старой клавиатуры 3) Записки…
sarahdonnavan, 29 марта 2023
Какую клавишу нужно нажать, чтобы зафиксировался режим ввода/вывода прописных букв?
imar, 29 марта 2023
Оформите в виде процедур алгоритмы рисования букв М И Р. Составьте алгоритмы рисования слов МИР РИМ МИМ (7 класс)
openup, 29 марта 2023
3. Перевести число 344 из десятичной системы счисления в двоичную.…
burunduk, 29 марта 2023
Вычислите сколько байтов занимает на CD одна минута звукозаписи (частота жискретизации — 44000, рязрядность — 16 битов)
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...