Регистрация
каринка195
24.05.2021 04:47
Информатика
Есть ответ 👍

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

252
380
Посмотреть ответы 2

Ответы на вопрос:

annakokesnik
annakokesnik
4,7(88 оценок)
Var a: array[1..20] of real; b: real; c: integer; begin writeln('введите курс доллара(в рублях)'); readln(b); for c: =1 to 20 do begin a[c]: =c*b; writeln(c,'д = ',a[c],'руб'); end; end.
MrHelpOnline
MrHelpOnline
4,4(52 оценок)
Правельный ответ

Популярно: Информатика