Составить программу которая выводит соотношение между евро и рублём 10 строчек
типа 1 евро это 68 руб и таких до 10 евро в столбик

Bigdaddypro100 Bigdaddypro100    1   21.01.2020 19:23    0

Ответы
Глеб0071 Глеб0071  11.10.2020 02:16

Объяснение:

program EurToRub;

const

   Rate = 68;

var

   Eur : integer;

   Rub : real;

begin

   for Eur:= 1 to 10 do begin

       Rub := Eur * Rate;

       writeln (Eur, ' EUR = ', Rub:5:2, ' RUB');

   end;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика