Регистрация
Даша182005
30.09.2020 03:01
Информатика
Есть ответ 👍

Хто з Альтернативи ть Що буде результатом виконання даної програми?

218
455
Посмотреть ответы 1

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

екатерина24131
екатерина24131
4,7(38 оценок)
//pascal v3.0 сборка 1111 const   n=10; var   ar: array[1..n] of integer;   i: integer; begin;   for i: =1 to n do   readln(ar[i]);   for i: =1 to n do   if ar[i]< 0 then write(i: 4); end.

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