Есть ответ 👍

Используя оператор While, составь программу, которая выводит на экран
таблицу стоимости яблок в диапазоне от 100 грамм до 1 килограмма с шагом 100
грамм. Ниже представлен рекомендуемый вид экрана программы во время ее
работы:
Введите цену одного килограмма яблок
725

Вес, г Стоимость, тг
100 72,50
200 145,00
300 217,50
400 290,00
500 362,50
600 435,00
700 507,50
800 580,00
900 652,50
1000 725,00

246
332
Посмотреть ответы 2

Ответы на вопрос:


a = 100

b = a * 0,725

while a <= 1000:

print(a + " " + b)

a = a + 100

Объяснение:


var sum,n,temp: integer;

begin

    sum: =0;

    n: =0;

    readln(temp);

    while(temp< > 0) do begin

      inc(n);

      sum: =sum+temp;

      readln(temp);

    end;

    writeln('sum = ',sum,'; ave = ',sum/n)

    end.

Популярно: Информатика