Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

1. Написать командный файл, который:

• запрашивает у пользователя текущий курс доллара

• запрашивает у пользователя сумму в рублях

• выводит сумму в долларах по текущему курсу

Ответ оставил Гость

uses crt;
var
a, b, i : real ;
begin
clrscr;
write(Курс $= ); readln (a);
write (Сумма в рублях = ); readln (b);
i:= b/a;
writeln (i:6:2);
readkey;
end.