Предмет: Информатика,
автор: Тупень201
Cоставьте программу, которая заполняет массив а [1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы, значения которых больше 5 и меньше 15
Ответы
Автор ответа:
0
На Pascal:
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.
Не забудь скомпилировать и отписаться, я мог допустить опечатку
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.
Не забудь скомпилировать и отписаться, я мог допустить опечатку
Автор ответа:
0
после writeLN точку с запятой, кстати, указывай язык, на котором надо отвечать
Похожие вопросы
Предмет: Математика,
автор: gilanik872
Предмет: Алгебра,
автор: kimm32388
Предмет: Английский язык,
автор: alikulovzoldas
Предмет: Химия,
автор: София252525
Предмет: Математика,
автор: ясмин1