По информатике решите надо след. : 1) 15 div 15= 2) (13 mod 5) div ( 17 mod 6)= 3)15 div 17= 4) 33 mod 33= 5) 15 div 4=

program pr;

var mas: array[1..40] of integer;

i, sum: integer;

begin

randomize;

for i: =1 to 40 do mas[i]: =random(20);

for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];

writeln ('сумма равна ', sum);

readln;

end.

программу проверил все работает

у меня получилось, что первое число 954, второе 459, а третье 495. т.е. получился пример : 954-459=495