Ответы
Ответ дал:
0
program p1;
uses srt;
var a,p,sum:integer;
begin
clrscr;
writeln("read p and a");
read(p);
read(a);
sum:=p*a;
write(sum);
readkey;
end;
uses srt;
var a,p,sum:integer;
begin
clrscr;
writeln("read p and a");
read(p);
read(a);
sum:=p*a;
write(sum);
readkey;
end;
Похожие вопросы
2 года назад
2 года назад
9 лет назад
9 лет назад