• Объясните, пожалуйста, паскаль! Откуда взялось Sr:8:2????
    var
    a:array[1..8] of integer; k,i,s:integer; sr:real;
    begin s:=0;
    for i:=1 to 8 do
    readln(a[i]);
    for i:=1 to 8 do
    if (a[i]>=100) and (a[i]<=999) then
    begin
    s:=s+a[i];
    k:=k+1;
    end;
    if k=0 then
    begin
    writeln('В массиве нет трехзначных чисел.');
    end;
    sr:=s/k;
    writeln('Среднее среди трехзначных чисел: ',sr:8:2);
    end.

Ответы 2

  • спасибо))
    • Автор:

      joseph
    • 5 лет назад
    • 0
  • ':8:2' означает, что будет выделено 8 полей для всего числа, из которых 2 поля будет для дробной части.
    • Автор:

      frye
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years