Решить по икт нужно вот это переделать так чтобы были квадратные числа var i: integer; begin for i: =1 to 10 do begin writeln (i); end; end.
100817ЛИСИЧКА240817
2
24.07.2019 17:40
1
Другие вопросы по теме Информатика
Nurzhan94
19.02.2022 05:31
cote18
19.02.2022 05:18
Nihilagay
12.09.2019 00:30
Pashtwt1
17.08.2019 17:10
polina200412
17.08.2019 17:10
Madi12kz
17.08.2019 17:10
Мороженка1111111
17.08.2019 17:10
анар53
12.09.2019 05:20
katmik04
20.01.2022 03:26
Популярные вопросы
- Рассчитайте общее сопротивление в электрической цепи при смешанном соединении...
2 - Cos58°*cos28°+sin58°*sin28°...
3 - Сынып тапсырмасы 1- Тапсырма. Тарихи диктантГрекиялық мемлекеттер бір-бірімен...
2 - Read the text and match the species with the number. Plants Mammals Birds...
3 - Как у Курмаша оказался слепой волчонок?...
1 - III. Переведите предложения, используя Past simple tense 12. Их не было...
1 - Сор по английскому . . . . . . .. . . ....
1 - Какое число надо прибавить к 7650, чтобы получить 7700?2) На сколько 10мин....
3 - Определи лицо, число и время глаголов а затем, Запиши этот глагол в начальной...
2 - Тест по литературе 8 класс Хлестаков. Да, деревня, впрочем, тоже имеет...
3
begin
For i:=1 to 10 do
begin
writeln (sqr(i));
end;
end.