Регистрация
ALINASVETLYRULIT
14.11.2020 23:21
Информатика
Есть ответ 👍

Приведите примеры задач для которых пользователю было бы необходимо держать открытыми 2 или 3 окна

191
480
Посмотреть ответы 1

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

ilyajdbda
ilyajdbda
4,6(19 оценок)

Объяснение:

uses crt;

var

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

s,n,i:integer;

begin

readln(n);

for i:=1 to n do

readln(a[i]);

s:=0;

clrscr;

for i:=1 to n do

if A[i]<0

then

s:=s+1;

for i:=1 to n do

writeln ('summa otricatelnih chisel:');

writeln (s);

end.

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