Составьте блок-схему алгоритма используя цикл с параметром. условный оператор в теле цикла не использовать. одна штука некоторого товара стоит 20.4 руб. напечатать таблицу стоимости 2, штук этого товара.
//1 var i: byte; begin for i := 2 to 20 do writeln('Цена за ',i,' = ', 20.4 * i); end.
//2 var i: byte; Price, TotalPrice: real; begin Price := 20.4; for i := 2 to 20 do begin TotalPrice := Price * i; writeln('Цена за ',i,'шт. = ', TotalPrice); end; end.
var i: byte;
begin
for i := 2 to 20 do
writeln('Цена за ',i,' = ', 20.4 * i);
end.
//2
var i: byte;
Price, TotalPrice: real;
begin
Price := 20.4;
for i := 2 to 20 do
begin
TotalPrice := Price * i;
writeln('Цена за ',i,'шт. = ', TotalPrice);
end;
end.