Дан массив целых чисел, все элементы кратные числу 5, заменить на 0.

Question

43

Дан массив целых чисел, все элементы кратные числу 5, заменить на 0.

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

ответить

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

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

feenich · Accepted Answer

45

feenich

20 февраля 2023

const max=99; var a: array[0… max] of integer; var i: integer; begin randomize; for i: =1 to max do a[i]: =random (5001); for i: =1 to max do begin if (a[i] mod 5)=0) then a[i]: =0; end; for i: =1 to max do writeln (a[i]); readln; end.

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

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

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

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