
Ферапонт
5 год назад
Решить задачу с помощью программы REPEAT. Килограмм творога стоит 300 тенге нужно найти стоимость творога 100 гр, 200 гр, 300 гр, 400 гр,и так до 1000 гр.
ОТВЕТЫ

Egor
Oct 24, 2020
var a : integer;
begin
repeat
a:=a+100;
writeln(a*0.3, ' руб за ', a, ' гр')
until a = 1000
end.
begin
repeat
a:=a+100;
writeln(a*0.3, ' руб за ', a, ' гр')
until a = 1000
end.
886
Смежные вопросы: