Program z1; var a,b,c: real; begin writeln('введите 2 числа'); readln(a,b); if(a> b)then c: =a/b; writeln(c); else (c: =b/a; writeln(c); ) end. где ошибка

умник1622 умник1622    2   18.09.2019 03:50    0

Ответы
FruitAPps FruitAPps  10.09.2020 11:21
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика