Высказывания: 1, 3, 4, 7, 8, 9, 10, 12
Истинно: 1, 3, 7, 8, 9, 10
uses crt;
var a,b,s,p:real;
begin
clrscr;
write('a='); read(a);
write('b='); read(b);
s:=a*b;
p:=2*(a+b);
write('S=',s,' P=',p);
end.
Вот.................................................