Есть ответ 👍

Корселтілген суретте қалай аталады

227
363
Посмотреть ответы 2

Ответы на вопрос:


ромрнпппеоонргниошоллщлл

katrinmirz
4,8(30 оценок)

Var a: array[1..5] of integer;       sr,i: integer;       s: string;       sar: real; begin     sr: =0;     s: ='';     for i: =1 to 5 do     begin         readln(a[i]);         sr: =sr+a[i];         s: =s+inttostr(a[i])+',  ';     end;     sar: =sr/5;     s[length(s)]: ='';     writeln(s);     writeln('среднее равно:   ',sar); end.  

Популярно: Информатика