Составьте программу, которая запрашивает стоимость 1 кг яблок и выводит на экран стоимость 1,2,3 ...10 кг яблок. Результат работы программы может выглядеть так: Введите стоимость 1 кг яблок 5.4 Стоимость 1 кг яблок = 5.4 руб. Стоимость 2 кг яблок = 10.8 руб. Стоимость 3 кг яблок = 16.2 руб.
283
328
Ответы на вопрос:
pascal
Объяснение:
const kg = 10;
var i: integer;
cost: real;
begin
Write('Введите стоимость 1 кг яблок: '); ReadLn(cost);
for i := 1 to kg do
WriteLn('Стоимость ', i, ' кг яблок = ', i * cost, ' руб.');
end.
Популярно: Информатика
-
Аннаlove201726.09.2021 17:09
-
davidgts25.07.2021 21:48
-
7799de29.01.2023 21:35
-
chepelenkosivun22.11.2021 11:44
-
biktimirovandre24.03.2022 06:00
-
Semensem24.01.2022 22:09
-
УльянаТонких02.08.2021 16:11
-
Veronika69117.11.2022 19:33
-
lizyakehehe15.01.2022 06:01
-
lolaaaaa231.12.2022 08:06