Информатика, 9 класс.


Составить программу для решения задачи: Напечатать таблицу перевода 1, 2,...20 долларов США в рубли по текущему курсу (значение вводится с клавиатуры).

​

Program <любое название на английском>

uses crt;

var n:integer;

begin

read(n);

for n:=1 to 20 do writeln(n, '$= ', 65*n, 'рублей');

end.

Вроде так.