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

Помогите составить программу для нахождения среднего арифметического 4  чисел в паскале

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

    uses crt;
    var
    i,y,x,z:integer;
    n:single;
    begin
    clrscr;
    writeln('Введите 4 числа');
    readln(i,z,x,y);
    n:=(x+y+z+i)/4;
    writeln('Среднее= ',n:0:3);
    readln();
    end.

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