Задача на скриншоте. Решение на языке паскаль(7 класс)

vitcke1 vitcke1    1   07.04.2020 04:13    1

Ответы
berry91819 berry91819  12.10.2020 20:34

Program zadacha;

var

kol:integer;

cena:real;

St:real;

begin

writeln ('Введи цену '); readln(cena);

for kol:=2 to 20 do begin

  St:= cena*kol;;

  Writeln (kol,' кол-ва товаров = ',St);

end;

end.


Задача на скриншоте. Решение на языке паскаль(7 класс)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика