написать программу на pascal. Напишите программу, выводящую ряд квадратов чисел от 1 до 10 двумя for и while
Ogents007
1
22.04.2021 23:18
1
Другие вопросы по теме Информатика
4Z1GGeR4
03.05.2020 16:21
НастяСонная
03.05.2020 16:25
rusakovwn
03.05.2020 15:17
yevdokimenkoal
03.05.2020 15:18
rdta
03.05.2020 15:18
ALexus67
03.05.2020 15:19
mrPool10
03.05.2020 15:19
tatanavolosnova1
03.05.2020 15:20
artur17499
03.05.2020 15:20
123451529
03.05.2020 15:21
Популярные вопросы
- Порошок заліза кількістью речовини 1.2 моль повністю згорів у кисні. Обчисліть,...
3 - Почему господин Н. ищет Асю? (Тургенев Ася )...
2 - Как поместить слона в халодильник...
2 - Полина написала восемь последовательных натуральных чисел и обвела четыре из...
2 - Надо переписать текст с этой картинки без плана...
3 - О.Бөкей Тортай мінген ақ боз ат әңгімесіндегі Тортай деген балаға хат жазу...
3 - Всем добра! Хотела узнать как правильно называются носочки у лошади (в конном...
3 - 6sin 6a/cos 3a, если sin tgy= 8...
3 - Длина сферы,радиус которой равен 6 см. а)найти v, s,d б)написать уравнение сферы...
2 - Неге жұлын зақымданғанда аяқ сал бопып, сезімталдық толығымен жойылып ?...
3
С цикла for:
var
i:integer;
begin
for i:=1 to 10 do
writeln(i*i);
end.
цикла while:
var
i:integer;
begin
i:=1;
while i<=10 do
begin
writeln(i*i);
i+=1;
end;
end.
Объяснение:
i+=1 - запись равнозначна записи i:=i+1