Регистрация
777SwimmeR777
09.02.2022 09:11
Информатика
Есть ответ 👍

Решить на паскаль 2. ввести четыре слова на языке. вывести на экран все глухие согласные буквы которые не входят хотя бы в одно слово. и 1 !

131
258
Посмотреть ответы 1

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

tarasova751
tarasova751
4,5(94 оценок)

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.

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