Дан массив целых чисел,все элементы кратные числу 5,заменить на ...
Ответ
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.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022