<span>Напишите программу, которая заполняет массив из N = 10 случайными числами в
диапазоне [10,50], выводит его на экран, а затем выполняет реверс отдельно первой
и второй половин массива. При изменении значения N программа должна работать
правильно без дополнительных изменений. </span>
Program Timer;
Uses Crt;
var i:longint;
begin
write('Введите прмежуток времени в секундах:');
readln(i);
Delay(i*1000);
Sound(440); {нота Ля}
Delay(2000);{в течении 2 секунд}
NoSound;
write('Нажмите любую клавишу для выхода:');
readkey;
end.
Различают следующие типы меню:
по исполнению:
текстовое,
графическое;
по функциям:
главное меню приложения;
всплывающее меню;
контекстное меню;
системное меню.
For i:= 1 to n do
if (mas[i] mod 2 = 0)
sum := mas[i] * sum;