Паскаль Вариант 1 1. Вывести ** экран стоимость сыра весом 50, 100, 150, 200 …1000 гр. по...

Question

Паскаль Вариант 1 1. Вывести на экран стоимость сыра весом 50, 100, 150, 200 …1000 гр. по цене 150 руб. за 1 кг. 2. с шагом 1

Comments

нужно чтобы вводился вес или по умолчанию заданный?

---

так я не внимательно прочитал, ща порешаем

Answer 1

var

   a, i: integer;

   begin

   read (a)

   for i := 0 to 20 do

   {

   wrileln (a * 150 / 100);

   a := a + 50;

   }

end.

что то типо того