Дан массив A (m) , m ≤ 20. Найти сумму S его положительных элементов. Все отрицательные…

Question

36

Дан массив A (m) , m ≤ 20. Найти сумму S его положительных элементов. Все отрицательные элементы удвоить. Вывести на печать исходный массив, переформированный массив и число S.

в избранное ссылка

Знаете ответ?

alexuss · Accepted Answer

39

alexuss

10 марта 2023

For i: =1 to m dobeginif (-a[m]<>a[m]) then s: =s+1; else a[m]: =a[m]*2; writeln (a[m],'); end; writeln (s);

комментировать

в избранное ссылка отблагодарить