Дан массив из 10 целых чисел…

Question

Дан массив из 10 целых чисел от -20 до 20. Написать программу, определяющая каких элементов в нем больше: положительных или отрицательных. Помогите решить, паскаль

Answer 1

37

zhyravlik

06 апреля 2023

Program z10; var a,b: Array [1… 10] of integer; i,q,k: integer; BeginRandomize; q: =0; k: =0; For i: =1 to 10 dobegina[i]: =random (40) -20; if (a[i]<0) then q: =q+1; if (a[i]>0) then k: =k+1; end; if (k>q) then writeln ('положительных больше'); if (k

пользователи выбрали этот ответ лучшим

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

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

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: