//Для примера написал программу, которая просит пользователя ввести пароль. В программе ограничено количество попыток ввода пароля до 5, то есть, если пользователь с пяти раз не смог правильно ввести пароль, программа сообщает, что попытки ввода закончились.
//Для этой задачи использовал цикл c постусловием (repeat - until)
const
attempts = 5;
password = '12345';
var
counter: integer;
str: string;
begin
counter := 0;
repeat
write('Введите пароль: ');
readln(str);
if not(str = password) then
begin
counter := counter + 1;
writeln('[неверный пароль] осталось попыток: ', attempts - counter);
writeln();
end;
if (counter = attempts) then
begin
writeln('Попытки ввода закончились!');
break;
end;
until (str = password);
if (str = password) then
writeln('Вы ввели правильный пароль!');
end.
Программа в который используется данный алгоритм
Я начиная от конца текста рассуждал.
Браун-альта,кларнет
Смит-флейта,гобой
Вессон-труба,скрипка
//я так понимаю, речь идёт о монотонном возрастании
var ar:array[1..10] of integer;
i:integer;
begin;
for i:=1 to 10 do
readln(ar[i]);
for i:=2 to 10 do
begin;
if ar[i]<ar[i-1] then
begin;
writeln('Не возрастает');
exit;
end;
end;
writeln('Возрастает');
<span>end. </span>
1 любви
2 температурах
3 выполнять
4 генераторов
5 работу