отдам

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

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

284

403

Посмотреть ответы 1

Ответы на вопрос:

arinuchik

Информатика

4,5(3 оценок)

Программа рисует прямоугольник, длина и ширина которого задана случайным образом в указанном диапазоне program name; uses graphabc; var a,b,x1,x2,y1,y2: integer; begin a: = random (6)+15; b: = random (9)+20; x1: =300; x2: =x1+a; y1: =300; y2: =y1+b; rectangle (x1,y1,x2,y2); end.