profile
Опубликовано 6 лет назад по предмету Информатика от ktyrff

Написать программу на паскале: вычислить средний балл ученика по 12 предметам.Оценки по каждому предмету задать самостоятельно.

  1. Ответ
    Ответ дан sansanic

    type ocenka=1..5;
    var a: array [1..12] of ocenka;
    i:integer;
    s: real;
    begin
    s:=0;
    for i:=1 to 12 do begin
    readln(a[i]);
    s:=s+a[i];
    end;
    writeln(s/12:0:3);
    end.

Самые новые вопросы