Регистрация
Vil67
09.04.2020 18:53
Информатика
Есть ответ 👍

3. текст программы с ошибкой представлен ниже: program n1; var a: array [1..8] of integer; s, k: integer; beginfor k : = 1 to 8 do readln (a[k]); s : = 0; for k : =1 to 8 doif a (k) < 0 then s : = s + a[1]; writeln (s)endкаким окажется ответ после исполнения этой программы, если вчестве элементов массива будут введены числа 1,2, 3, 4, -1, -2, -3, -4? как исправить программу, чтобы она решала поставленную передпограммистом ? 20б​

179
352
Посмотреть ответы 1

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

Batmanq11111
Batmanq11111
4,6(12 оценок)
// pascalabc.net 3.3 begin   var n: =readinteger;   var a: =arrgen(n,2,x-> 2*x);   a.println; end. пример: 10 2 4 8 16 32 64 128 256 512 1024

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