Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
MrHleb
05.07.2022 08:43 •
Информатика
Написать программу, которая находит сумму кубов всех целых чисел от а до 60. значение а вводится с клавиатуры, 0< =a< =60 решать через цикл с постусловием ()
Показать ответ
Ответ:
3ТОН
05.10.2020 13:22
Program n1;
var a,sum,i: longint;
begin
readln(a);
sum:=0;
repeat
sum:=sum+a*a*a;
a:=a+1;
until (a>60);
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
умный321
17.11.2020 00:40
Python Напишите программный код, используя цикл while, для решения задачи: вывести на экран перевод 1, 2, . . ., 20 долларов США в рубли по текущему курсу (значение...
makesim
11.05.2020 05:02
Запустите программу проверьте код и исправьте ошибки заполните таблицуукажите ошибку; | введите правильный фрагмент кода; |...
yakovlevakristi
21.05.2023 11:45
Вопрос 1. выберите домен верхнего уровня в интернете, принадлежащий россии: *rurorusraвопрос 2. интернет – это: *локальная сетькорпоративная сеть сетьрегиональная сетьвопрос...
Nastusha21032005
13.11.2020 16:20
Как составить программу знакомства с компьютером ?...
POGBOOM
07.06.2022 21:40
Вданном тексте впиши пропущенные слова (в каждое поле нужно вписать только одно слово с учётом правил орфографии и грамматики): передача информации требуется для её...
Анечка1611
24.03.2023 21:13
Установите, какие из следующих предложений являются логическими высказываниями, а какие нет: 1. солнце есть спутник земли 2. 2+3=5 3. сегодня отличная погода 4. в романе...
isaev40daniil14
14.01.2021 00:16
Для кодирования некоторого набора символов решили использовать неравномерный двоичный код, удовлетворяющий условию фано. известно, что для кодирования применили только...
Kamjla1
14.01.2021 00:16
Используя метод половинного деления, определи имеет ли уравнение y=-4x2−11,8x+3 корень на промежутке [0, 0]....
guarginia666
22.09.2022 14:47
Нужно составить таблицу отличительных свойств ромба прямоугольника и треугольника...
azzitop
22.09.2022 14:47
Докажите тождества: 10101010011100₂ = 25234₈; 1c63₁₆ = 1110001100011₂...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,sum,i: longint;
begin
readln(a);
sum:=0;
repeat
sum:=sum+a*a*a;
a:=a+1;
until (a>60);
writeln(sum);
end.