Составьте программу на языке паскаль которая будет запрашивать курс доллара и печатать таблицу перевода 1 2 доллара в рубли
184
204
Ответы на вопрос:
Var i,n: integer; k: real; begin write('введите текущий курс доллара '); readln(k); write('введите количество долларов '); readln(n); if n> 0 then for i: = 1 to n do writeln(i,' долларов = ',i*k,' рублей! ') else write('повторите программу с другим количеством долларов'); end.
Популярно: Информатика
-
gilkin0110.04.2020 07:08
-
crybaby191611.05.2022 11:36
-
londonparisch10.09.2021 21:44
-
Aleusand30.06.2023 17:00
-
Софочкакошечка1306.10.2020 15:33
-
1Asya11114.12.2020 20:34
-
Kamilla147227.06.2022 19:15
-
ПолинаПадафет1526.05.2021 14:20
-
Medina2016110205.12.2020 11:24
-
r7953324081302.11.2020 06:04