Дан массив mas(s) из вещественных частей.Введите в строчку и выведите в

Дан массив mas(s) из вещественных частей.Введите в строчку и выведите в строчку элементы массива с одним знаком после запятой,на вывод числа отведите 6 позиций

Задать свой вопрос
1 ответ

Program Z;

uses crt;

const N=5;

var A:array [1..N] of integer;

      i:integer;

      s:real;

begin 

     ClrScr;  

     

     for i:=1 to N do

     readln (A[i]);

 

     ClrScr;

   

      for i:=1 to N do

      begin

      write (A[i],',');

      s:=s+A[i];

      end;

 

      writeln;

      s:=s/n;

      writeln (s);

  

      readln

end. всё изи

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт