Question

ПОМОГИТЕЕЕЕ ПОЖАЛУЙСТА
50 балов отдам

1 вопроc.
For i:=18 to 26 do write(‘ Контрольная работа’); Сколько раз будет написано ‘ Контрольная работа’ ?

2вопрос.
Написать программу. Найти и вывести вторую степень всех целых чисел от 16 до 21 включительно.​

Answer 1

Ответ:

Объяснение:

18

var i: integer;

begin

    For i:=16 to 21 do writeln(i*i);

end.