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.
Поделитесь своими знаниями, ответьте на вопрос:
Запиши число 13648 в развёрнутом виде, начиная со старшего разряда.
Internet_Explorer - браузер от M|icrosoft, больше не поддерживается, является стандартным браузером во всех ос от Microsoft кроме Wi|ndows_10. Его называют браузер, нужный для загрузки другого браузера
Oper_a - Довольно мощный браузер с большим количеством средств анонимизации( например встроенный VPN). Сейчас не очень популярен, но занимает большую часть браузеров на старых мобильных ОС(например Symbian)
Fire__fox - очень мощный браузер. Часто стоит по умолчанию в большом количестве Linux_ дистрибудтивов. Легко настраивается и удобен в использовании.
Goog|le_chrome - Браузер от компании Goog|e. Основан на движке собственного проихводства. Имеет встроенную поддержку всех функций и сервисов от Goog|e
Yande_x - Достаточно новый браузер от российской компании. Достаточно удобен в использовании. Интегрируется с сервисами от Yande_x