Выберите условия, которые верно записаны на языке Паскаль: а) b>0

б) s<>3

в) s>5 или s<7

г) (s>3) or (s<8)

д) s: =3

е) s=3

т.к 3 вида флагов, значит возводим число 3 в степень равную кол-ву флагов

ответ: 81 сигнал 

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

end.чему в школе то  

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;

max: =a[1];

for i: =2 to 10 do

begin 

if a[i]> max then

max: =a[i];  

c: =i;  

  end;

min: =a[1];

for i: =2 to 10 do

begin

if a[i]< min then

min: = a[i];

d: =i;

end;

a[c]: =x;

a[c]: =a[d];

a[d]: =x;  

это кусочек программы в паскале для нахождения максимального элемента на скоко я помню