program ugadai;
var a,b,k:integer;
begin
b:=random(101)-50;
writeln('Попробуйте угадать число от -50 до 50 за 10 попыток');
writeln;
k:=1;
repeat
write('Попытка ',k,'. Введи число: ');
readln(a);
if a>b then writeln('Загаданное число меньше!')
else if a<b then writeln('Загаданное число больше!')
else if a=b then
writeln('Вам удалось!');
k:=13;
end;
k:=k+1
until k>10;
if k=11 then
writeln('Попробуйте еще раз.')
end
end.
Объяснение:
Загадываем число (random)
Цикл с пост условием, k - счётчик попыток.
Условный оператор для корректировки угадывания.
Если все попытки исчерпаны, вывод предложения попробовать ещё раз.
При попадании вируса в СК,ПК начинает лагать, могут выходить странные рамки, и даже требования вернуть ПК в рабочее состояние.
С антивирусников можно очистить СК
Вирусописатели(хакеры) делают вирусы для того что бы считывать информацию с банковских карт, моб. телефонов, уничтожения ПОи т. д
Черви это вирусы которые ползают по сестеме медленно её разрушая. Спамеры отсылают спам. Воры считывают инфу.
Не лазить по сайтам с подозрительным содержанием, не скачивать файлы если вы не знаете от кого они и что в нутри. Устанавливать антивирусники
Отметь лучший ответ
program ugadai;
var a,b,k:integer;
begin
b:=random(101)-50;
writeln('Попробуйте угадать число от -50 до 50 за 10 попыток');
writeln;
k:=1;
repeat
write('Попытка ',k,'. Введи число: ');
readln(a);
if a>b then writeln('Загаданное число меньше!')
else if a<b then writeln('Загаданное число больше!')
else if a=b then
begin
writeln;
writeln('Вам удалось!');
k:=13;
end;
k:=k+1
until k>10;
if k=11 then
begin
writeln;
writeln('Попробуйте еще раз.')
end
end.
Объяснение:
Загадываем число (random)
Цикл с пост условием, k - счётчик попыток.
Условный оператор для корректировки угадывания.
Если все попытки исчерпаны, вывод предложения попробовать ещё раз.
При попадании вируса в СК,ПК начинает лагать, могут выходить странные рамки, и даже требования вернуть ПК в рабочее состояние.
С антивирусников можно очистить СК
Вирусописатели(хакеры) делают вирусы для того что бы считывать информацию с банковских карт, моб. телефонов, уничтожения ПОи т. д
Черви это вирусы которые ползают по сестеме медленно её разрушая. Спамеры отсылают спам. Воры считывают инфу.
Не лазить по сайтам с подозрительным содержанием, не скачивать файлы если вы не знаете от кого они и что в нутри. Устанавливать антивирусники
Отметь лучший ответ