Регистрация
Войти
Стать экспертом Правила
Информатика

Пожалуйста посчитайте,пж информатика 9 класс. Составе программу,которая формирует массив из шестнадцати случайных целых чисел от -20 до 20 и подсчитывает количество отрицательных элементов. Даю 13 поинтов

ОТВЕТЫ
program otricanie;
var
 mas:array [1..16] of integer;K,i:integer;
begin
K:=0;
for i:=1 to 16 do 
begin 
mas[i]:=Random(41)-20; 
if mas[i]<0 then K:=K+1;
 end; 
Writeln(k)
end.
833
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам