logo
Войти Регистрация Спроси ai-bota


Маслинка174
05.04.2020 10:07

Напишите программу(turbo pascal)выводящую на экран кубы чисел от 1 до 20.заранее ))

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
timon040805
timon040805
14.12.2022 20:12
Надо, лень искать, поймите меня) 50 за это! 1.для чего предназначена операционная система? 2.что такое файловая система? 3.какие объекты файловой системы вы знаете?...
Fatimochkaananas
Fatimochkaananas
14.12.2022 20:12
Напишите процедуру, которая выведет на экран в столбик все цифры переданного ей числа, начиная с первой нужно полностью написать программу...
police5
police5
28.02.2023 20:58
Вычислить максимальное число четных чисел К, сумма S которых не превышает значения S = S1....
lerakycher2001
lerakycher2001
01.04.2021 23:01
Сколько в тб- гб,мб,байт и бит? (не помню ск. их там вообщем сколько в 1тб...
Vovavelchenko12
Vovavelchenko12
23.08.2022 07:00
У вікні редактор тексту можна(Лазарус):1.Створювати та редагувати код програми2.Малювати3.Розміщувати різні графічні елементи4.Читати повідомлення про помилку у...
mussa777772
mussa777772
23.11.2021 11:27
2. 3 деякою масою газу відбувся замкне ний цикл. д) ізобарний, ізохорний, ізотермічний. 0 г) iзохорний, ізобарний, ізотермічний; в) ізотермічний, ізобарний, iзохорний;...
Ксения1802
Ксения1802
15.12.2021 11:56
Дано ABC и MNK Кут И AB=MN= 8см AS=MK=5 см BS=4см доказать равенство треугольников и найти их периметр...
sofiafrog2004
sofiafrog2004
10.02.2020 09:56
Сөздерді/сөз тіркестерді ретімен орналастырып, сөйлем құра. елестету қиын. компьютерсіз өмірімізді өз дамыған заманында Ғылым мен техниканы...
moroshan77
moroshan77
11.08.2022 21:42
Задание №2. Среди всех двузначных чисел, расположенных до заданного N (10 N 99), найдите числа с одинаковыми цифра-ми в десятках и единицах.Например34Результат11...
Куземченко
Куземченко
31.03.2021 03:38
Как изменилось положение католической церкви в Европе в XIV веке? Приведите не менее двух аргументов....
Ответ:
RassvetZaGorami
02.10.2020 08:01
Program zadanie;
Var a,i:integer;
Begin
 For i:=1 To 20 Do
 begin
 a:=i;
 a:=sqr(a);
 Writeln(a);
 end;
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота