Регистрация
max690
28.05.2023 08:14
Информатика
Есть ответ 👍

Составить программу на с++. вводим переменные abcd . программа должна вывести количество переменных быльше 0

155
446
Посмотреть ответы 1

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

Карина2000017
Карина2000017
4,7(26 оценок)

var a: array [1..100] of integer;

n,i,j: integer;

f: boolean;

begin

  read(n);

  f: =false;

  for i : = 1 to n do begin

      readln(a[i]);

      for j: = 1 to i-1 do

          f=f or (a[i]=a[j]);

  end;

  writeln(f);

 

end.

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