Ответы
Ответ дал:
1
program Turbo;
uses Crt;
var
a,b,r:real;
begin
Write('Введите a и b через пробел: ');
Readln(a,b);
r:=a*b;
Writeln('Произведение равно ',r);
ReadKey
end.
uses Crt;
var
a,b,r:real;
begin
Write('Введите a и b через пробел: ');
Readln(a,b);
r:=a*b;
Writeln('Произведение равно ',r);
ReadKey
end.
Вас заинтересует
3 месяца назад
3 месяца назад
10 месяцев назад
10 месяцев назад
1 год назад
1 год назад
7 лет назад