Срочно! Помогите пожалуста!

Question

Срочно! Помогите пожалуста! Нужно написать програмный код в турбо паскале! Заранее ОГРОМНОЕ СПАСИБО! Заполнить массив из 10 элементов случайнымичислами в интервале от 0 до 4 и вывести номера всех элементов, равных X.

Answer 1

75

kalabs

23 февраля 2023

var a: array[1… 10]of integer; i,x: integer; beginreadln (x); for i: =1 to 10 do begina[i]: =random (5); if a[i]=x then writeln ('a[',i,'] '); end; end.

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

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

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

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

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