Регистрация
Melissa607
17.02.2020 03:13
Информатика
Есть ответ 👍

Сформировать массив из 20 элементов.вывести на экран.положительные элементы умножить на 8.отрицательные разделить на 3.вывести на экран преобразованный массив. , нужно

272
417
Посмотреть ответы 1

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

прррр11
прррр11
4,5(71 оценок)
1) var a: array[1..20] of longint; i,k: longint; begin for i: =1 to 20 do read(a[i]); for i: =2 to 20 do if (abs(a[i-1]) mod 3=0) and (abs(a[i]) mod 3=0) then k+=1; writeln(k); end. 2) var a: array[1..20] of longint; i,max: longint; begin for i: =1 to 20 do read(a[i]); max: =-2000000000; for i: =1 to 20 do if (abs(a[i]) mod 11=0) and (a[i]> max) then max: =a[i]; writeln(max); end.

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