Задать вопрос
29 апреля, 16:24

Паскаль. Найти среднее арифметическое трех целояисленных переменных.

+3
Ответы (1)
  1. 29 апреля, 19:36
    0
    Var

    S, i, a:integer;

    begin

    for i:=1 to 3 do

    begin

    readln (a);

    s:=s+a;

    end;

    writeln ('Srednee = ', s/3);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Паскаль. Найти среднее арифметическое трех целояисленных переменных. ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы