Решить задачу с помощью программы REPEAT. Килограмм творога стоит 300 тенге нужно найти стоимость творога 100 гр, 200 гр, 300 гр, 400 гр, и так до 1000 гр.
Решить задачу с помощью программы REPEAT. Килограмм творога стоит 300 тенге нужно найти стоимость творога 100 гр, 200 гр, 300 гр, 400 гр, и так до 1000 гр.
Гость
Ответ(ы) на вопрос:
Гостьvar a : integer;
begin
repeat
a:=a+100;
writeln(a*0.3, ' руб за ', a, ' гр')
until a = 1000
end.
Не нашли ответ?
Похожие вопросы