Регистрация
bzhx
23.10.2021 04:31
Информатика
Есть ответ 👍

Составьте анкеты-опросники по информатике

291
317
Посмотреть ответы 1

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

jjjonh9746
jjjonh9746
4,6(81 оценок)

program pr1; uses crt; var mas: array[byte] of integer; i,n: integer; beginclrscr; readln(n); for i: =1 to n do read(mas[i]); for i: =1 to n do if mas[i]< 0 then writeln(i,' ',mas[i]); end.

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