BashicageСоставьте программу, которая запрашивает стоимость 1 кг яблок и выводит на экран стоимость 1,2,3 . . . 10 кг яблок. Результат работы программы может выглядеть так: Введите стоимость 1 кг яблок 5. 4 Стоимость 1 кг яблок = 5. 4 руб. Стоимость 2 кг яблок = 10. 8 руб. Стоимость 3 кг яблок = 16. 2 руб.
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:
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.
140
StonefangЧтобы ответить необходимо зарегистрироваться.
