
Pipalyuv
4 год назад
program z1;var a,b,c:real;beginwriteln('введите 2 числа');readln(a,b);if(a>b)thenc:=a/b;writeln(c);else(c:=b/a;writeln(c);)end.где ошибка
ОТВЕТЫ

Merja Kirsi-Kaisa
Oct 24, 2020
Program z1;
var a,b,c:real;
begin
writeln('введите 2 числа');
readln(a,b);
if (a>b) then c:=a/b
else c:=b/a;
writeln(c);
end.
var a,b,c:real;
begin
writeln('введите 2 числа');
readln(a,b);
if (a>b) then c:=a/b
else c:=b/a;
writeln(c);
end.
350
Смежные вопросы: