Ответ №1
Var A, B, M, N, proizv:interger;
begin
A:=0;
B:=0;
M:=0;
N:=0;
proizv:=0;
readln(A" "B" "M" "N);
proizv:=A/B×M/N;
writeln(proizv);
end.
Ответ №1
Var A, B, M, N, proizv:interger;
begin
A:=0;
B:=0;
M:=0;
N:=0;
proizv:=0;
readln(A" "B" "M" "N);
proizv:=A/B×M/N;
writeln(proizv);
end.
Знаете ответ?