Паскаль! составить таблицу стоимости порций сыра весом 50, 100, 150, 1000г (цена 1кг=90руб)

eegorov1996 eegorov1996    1   31.05.2019 11:00    3

Ответы
arisha70 arisha70  01.07.2020 22:20
Var b, a:integer;
begin
while a <10000 do
begin
a:=a+50;
writeln ( a*0.001*90);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика