1. Какой формат записи верен? а) Write(' vvedi x',х); б) Writeln (vvedi x' ,х);
в) Write( vvedi x); г) Writeln ('vvedi x');
2. Какой из операторов присваивания записан неверно?
а) f;=' privet'; б) C10:= 456; в) L=sqrt(x); г) u:='009”;
3. Какие значения будут принимать переменные А, В после выполнения
действий? A:=6; B:=5; A:=3*В; B:=B+2;
а) А=15, В=5; б) А=15, В=7; в) А=4,B=10; г) А=10, B=6;
4. Укажите оператор ввода:
а) Writeln; б) Readln; в) Begin; г) Program;
5. Какое имя переменной верно с точки зрения синтаксиса Паскаль?
a) 1_gdes c) qwz_1 b) 3gngh d) !tyed
6. Какой формат записи неправильный?
a) Program exe; 6) Program_96; B) Program _Nomer_6; r) Program stud
7. Чему равно значение переменной d? d:= 19 div 4
8 Чему равно значение переменной ѕ?​

на листочке чертишь круг,берешь серединку,и получается- 4 клетки вниз и 7 в право

совершенное число это число равное сумме своих делителей отличных от самого числа

var i, s,j : integer;

begin for i : = 5 to 200 do begin s : = 0; for j : = 1 to i div 2 do if (i mod j = 0) then s : = s + j; if s = i then writeln(i); end; end.

1)52: 2=26(чел) любят пирож

2)26-20=6(чел) любят морож

ответ 6 чел

1)  2, 5, 4, 7, 8, 9,  16,  11, 32

2           5

4           7

8           9

16         11

32

*2           +2

чётное порядковое число умножается на 2

нечётное порядковое число увеличивается на 2

2) 3, 8, 15,  24,  35, 48,  63, 80

3

3+5=8

8+7=15

15+9=24

24+11=35

35+13=48

48+15=63

63+17=80

(к предыдущему ответу прибавляется по порядку идущее нечётное число)