tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано множество натуральных
Дано множество натуральных чисел от 1 до 20,вывести множество квадратов элементов нужно составить программу по языку паскаль. 53
Аймания
1 13.06.2019 03:50
0
Ответы
10149
10.07.2020 11:24
Program one;
var
i:integer;
begin
for i:=1 to 20 do
writeln(sqr(i));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Lol11111111000
02.07.2019 11:30
Выбери верный ответ () две девочки были в куртках,а одна в пальто. кто во что был одет, если маша с надей и катя с надей были одеты по разному? а)маша и надя в куртках...
voronkovid
24.05.2019 10:20
Лазерный принтер кэнон лбп печатает со скоростью в среднем 6.3 кбайт в секунду . сколько времени понадобилось для распечати восьми страничнего документа , если что...
qwdv
24.05.2019 10:20
Днк человека можно представить себе как некоторое слово в 4-х буквенном алфавите, где каждой буквой помечается звено в цепи днк сколько информации в битах содержит...
alenapolyakova5
24.05.2019 10:20
Десятичное число 327 в двоичной системе счисления равно?...
саша23310
20.07.2019 10:10
Какой минимальный объём памяти (в кбайт) нужно зарезервировать, чтобы можно было сохранить любое растровое изображение размером 64х64 пикселов при условии что в изображение...
ellavinokurova
21.02.2021 12:17
Визначте форму подання алгоритму. Дано послідовність команд, кожна з яких має свій порядковий номер і сформульована мовою людського спілкування. Послідовність сигналів...
жыландыыыы
21.02.2021 12:20
как можно быстрее k 1?Результат F(k)ФИО0( agProgram v2_21;VAR k:Integer;Procedure fin:Integer);BeginWrite( );IF n 1 ThenWrite( * );Write( * );ГEnd; ;BeginFor k:=0 TO...
annatimofeeva4
21.02.2021 12:23
Как правильно это решать?...
aytac200505
21.02.2021 12:25
Дано натуральное число. б) Верно ли, что произведение его цифр меньше 50? Вот код var n,p:integer; begin write( n = ); readln(n); p:=1; while n 0 do begin p:=p*(n mod...
LOSS903903
08.10.2019 07:41
Просклонять глаголы sein, heibe,malin в формах ты он она оно и т.п на ! ...
Популярные вопросы
Решить дифференциальное уравнение первого порядка с разделяющимися...
1
Задание. Работа с картой. Обозначьте на карте территорию государства...
2
Казактарды орыстандыру саясаты кандай сипатта болды ?...
1
5-6-сабак АСТАНА ӘСЕМ КАЛА Суреттерді өзара байланыстырып, әңгіме...
3
Функция задана формулой y=2x-15Значение x при котором y=-5...
3
|1)6,32)-0,73)0,74)-23/14...
3
ӨТІНІШ ЛАЙКПЕН ҚАЙТАРАМЫН...
3
Жырау ойын жалғастырып көр. Зар заманның аяғы — Заманың кетті баяғы,...
3
A=11,06; b=7,08; c=-6,19a=42,4; b=-17,3; c=23,5...
3
Рассчитайте сколько молекул содержится в 112 мл N2O5...
2
var
i:integer;
begin
for i:=1 to 20 do
writeln(sqr(i));
end.