Предмет: Информатика,
автор: sergey5593
помогите решить в pascal.
дано вещественное число-цена 1кг конфет. вывести стоимость 1.2, 1.4, ...2 кг конфет
Ответы
Автор ответа:
0
var i:integer;
price:real;
Begin
read(price);
for i := 6 to 10 do
writeln(i/5, 'kg = ', price*i/5);
End.
price:real;
Begin
read(price);
for i := 6 to 10 do
writeln(i/5, 'kg = ', price*i/5);
End.
Похожие вопросы