Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
viktoska87
23.08.2022 12:21 •
Информатика
Вывести квадраты и кубы 10 чисел следующей последовательности: 1 2 4 7 11 16 pascal abc
Показать ответ
Ответ:
vadimkor06
07.09.2020 11:57
Var a,b:real;
begin
a:=1;
b:=0;
repeat
writeln('Квадрат числа ',a,' = ',sqr(a),' Куб числа ',a,' = ',power(a,3));
a:=a+1+b;
b:=b+1;
until b>9
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Аляяяя0604
17.06.2020 10:43
На книжном стеллаже 16 полок. книга может быть поставлена на любую из них. сколько информации содержит сообщение о том, где находится книга?...
nermine
17.06.2020 10:43
Pascalabc 1. напишите программу, которая работает с двумя целыми числами, введёнными с клавиатуры. программа выводит все чётные числа, расположенные в интервале между...
Бесполезная3
15.03.2020 03:43
Напишите наименьшее число х, для которого истинно высказывание: НЕ (х 32) и НЕ (сумма цифр числа х не равна 15)...
babykitten5002p08hdk
26.02.2020 23:17
ЗАРАНЕЕ ОГРОМНОЕ КТО ОТКЛИКНИТСЯ ...
reginasachtova
26.02.2020 23:17
Контрольные во Что такое электронная таблица, с какой программы может реализовываться на компьютере? 2 Назовите основные элементы поля электронной таблицы. 3 Какие ссылки...
ZhenyaN123
16.02.2023 11:26
Алгоритм представлен в виде блок-схемы. Определите значение переменной b после выполнения алгоритма при a=2, b=10. Решение оформите в таблице. ответ запишите в виде:...
viktoriyabolgova
16.02.2023 11:26
В какой из записей указано объявление массива? A) var A: array [1..10] of integer.B) for i in range(10): if A[i] min: min=A[i].C) S=0 for i in range(10): S+=array[i].D)...
aisultankubashev
24.08.2020 16:55
Информатика сор сделайте что угодно из этого...
Sanchoys123
17.01.2020 10:38
1. Напишите программу которая выводит сообщение - Все билеты распроданы если продано 430 билетов, если меньше, то сообщение - «Билеты есть.Количество проданных билетов...
Ucoba
12.12.2021 01:35
Как написать команду которая при кнопку Registration сохранит в txt. все, что написано в строчках? (Python, Tkinter)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
a:=1;
b:=0;
repeat
writeln('Квадрат числа ',a,' = ',sqr(a),' Куб числа ',a,' = ',power(a,3));
a:=a+1+b;
b:=b+1;
until b>9
end.