Question

Плиз решите 1 информатика только напишите полностью программ тыры пыры

Answer 1

Program Test1;
Var a1,a2,b1,b2,c1,c2,a,b,c:Integer;
Begin
Readln (a1,a2);
a:=a1*a2;
Readln (c1,c2);
C:=c1*c2;
Readln (a1,a2);
B:=b1*b2;
Writeln(a, b, c);
End.

Answer 2

Последний Readln описался. Там должно быть Readln (b1,b2);