Есть ответ 👍

с 6 заданием по информатике, очень нужно!

245
368
Посмотреть ответы 2

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


Решение в файле. По-моему, всё правильно.


13. 1 var a: array [1.. 100] of integer; k,i: integer; begin for i: = 1 to 12 do readln(a[i]); k: =0; for i: = 1 to 12 do if a[i] < 0 then k: =k+a[i]; writeln(k); end.

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