Запишите следующие высказывания в виде логических выражений:
Если будет светить солнце, то ребята пойдут гулять, а если пойдет
дождь то ребята останутся дома.
Если учитель на уроке рассказывает интересно, то ни Маша, ни
Саша, ни Аня не будут смотреть в окно

var x,y,nod,nok: longint;

begin

read(x,y);

a: =x; b: =y;

while (a> 0) and (b> 0) do

if a> b then a: =a mod b

else b: =b mod a;

nod: =a+b;

nok: =(x div nod)*y;

write(nok);

end;

имя       возраст     занятие

оля         13             пение

петя         14           баскетбол

вася         13             хоккей

катя         15             танцы

коля         11         баскетбол

серёжа     11           футбол

var

  i: integer;

  a: array[1..16]of integer;

begin

  for i: =1 to 16 do

begin

  a[i]: =random(40)-20;

  if a[i] mod 3=0 then write(i,' ');

end;

writeln;

end.

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