Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
смотри блок-схему в приложенном файле
1) 28
2) 6
3) 5
4) 1
5) 7
6) 27
итого:
1, 6, 5, 2, 3, 4.
1)
var
x,y,s: real;
begin
readln(x,y);
s: =abs(x*y);
writeln(s: 8: 2);
end.
2)
a: integer;
readln(a);
if a mod 2=0 then writeln("четное число")
else writeln("нечетное число")ж
x на первом
у на втором
х+2=у
х+22=3у
отнимаем первое от второго
20=2у
у=10
х=у-2=8
Популярные вопросы