Решить задачу в Паскале: Задать случайным образом 8 элементов числового массива…

Question

39

Решить задачу в Паскале: Задать случайным образом 8 элементов числового массива – числа от 100 до 200. Вставить в него: а) число «-20» перед 5-ым элементом. Б) число «0» перед максимальным элементом. В одной задаче должно быть и а и б (но можно и по отдельности, главное, чтобы было верно) срочно! Жду верного и быстрого решения)

категория: информатика

ответить

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

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

s_s0k0l0v · Accepted Answer

49

s_s0k0l0v

02 сентября 2022

1) program gt; var a,b: array[1… 100]of integer; n,m,i: longint; beginRandomize; a[5]: =-20; for i: =1 to 8 dobeginif (i<5) then a[i]: =random (101)+100; if (i>4) then a[i+1]: =random (101)+100; end; for i: =1 to 9 dobeginwrite (a[i],'); end; end.2) program gt; var a,b: array[1… 100]of integer; n,m,i,max: longint; beginRandomize; max: =-20; for i: =1 to 8 dobegina[i]: =random (101)+100; if (a[i]>max) then max: =a[i]; end; for i: =1 to 8 dobeginif (a[i]<>max) then write (a[i],'); if (a[i]=max) then write (0,',a[i],'); end; end.

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

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

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

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