Есть ответ 👍

Каких скобок не найти на клавиатуре компьютера

142
425
Посмотреть ответы 2

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


Вот этих скобок нету на клавиатуре.

Если нужно на паскале: program test; var mas : array[1..15] of integer; sum : integer; otr : integer; i: integer; begin sum : = 0; otr : = 0; randomize; for i: =1 to 15 do begin     mas[i] = -50 + random(100);     sum : = sum + mas[i];     if mas[i] < 0         then otr : = otr + 1; end; writeln ('сумма:   ' + sum); writeln ('количество отрицательных элементов:   ' + otr); end.

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