Составить программу которая вводит 7 оценок с клавиатуры и выдает средний

Treed1 Treed1    2   17.09.2019 20:40    0

Ответы
Luda2600 Luda2600  07.10.2020 22:37

program HelloWorld;

var n: double;

var i,c,summ: integer;

begin

    for i:=1 to 7 do

    begin

        writeln('Введите оценку:');

        readln(c);

        summ := summ + c;

    end;

     writeln('Введите оценку:');

    writeln(summ/c:15:2);

 end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика