var
a: array[1..1000] of real;
i, k, n, z: integer;
begin
writeln('введите число n: ');
readln(n);
writeln('введите число z: ');
readln(z);
writeln('введите ',n,' действительных чисел (каждое с новой строки): ');
for i : = 1 to n do
begin
readln(a[i]);
if a[i] > z then
begin
a[i] : = z;
k : = k + 1;
end;
end;
writeln('количество замен: ', k);
end.
ответ:
ну обычно, это:
1. заголовок окна - где пишется название программы или название создаваемого документа плюс кнопки "закрыть", "свернуть", "развернуть"
2. строка меню - строка, через которую программой
3. панель инструментов - панель быстрого доступа к элементам программой.
4. рабочая область, в которой работает пользователь.
5. строка состояния - отображает текущий процесс или состояние.ну обычно, это:
1. заголовок окна - где пишется название программы или название создаваемого документа плюс кнопки "закрыть", "свернуть", "развернуть"
2. строка меню - строка, через которую программой
3. панель инструментов - панель быстрого доступа к элементам программой
4. рабочая область, в которой работает пользователь .
5. строка состояния - отображает текущий процесс или состояние.
объяснение: