Регистрация
Войти
Стать экспертом Правила
Информатика

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.где ошибка

ОТВЕТЫ
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.
350
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам