Cоставьте программу, которая заполняет массив а [1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы, значения которых больше 5 и меньше 15
More Questions From This User See All
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program znanija;
uses Math;//если на Delphi, то System.Math
var a: array [0..10] of integer;
begin
for I := low(a) to high(a)do
begin
a[I] := randomrange(1, 20);
if (a[I] > 5) and (a[I] < 15) then
writeLN(a[I])
end;
end.
Не забудь скомпилировать и отписаться, я мог допустить опечатку