Есть ответ 👍

решить: (тестовое решение)
1.в массиве состоящем из n элементов , заменить отрицательные элементы числом 15

2.в массиве,состоящем из n элементов,подсчитать сумму чисел, значения которых меньше 10

295
390
Посмотреть ответы 1

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


Procedure wr( ch: char; c: integer ); var i: integer;   begin for i : = 1 to c do write(ch); end; procedure   square( n: integer ); var i: integer; begin wr( '*', n ); writeln; for i : = 2 to n-1 do begin write( '*' ); wr( ' ' ); writeln( '*' ); end; wr( '*', n ); writeln; end;

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