writeln('Сидит девица в темнице, а коса на улице.');
readln(s);
while(s <> 'Морковь')
do begin
writeln('Не угадал. Попробуй еще раз');
readln(s);
end;
writeln('Правильно. Угадал!');
end.
/*
Описание:
Выводим пользователю загадку и просим его ввести ответ. Пока пользователь не угадает, просим его снова и снова вводить ответ, предварительно написав, что он ошибся. Как только мы получаем правильный ответ, программа выводит пояснение пользователю, где пишет, что тот угадал. Программа заканчивает свою работу.
Червь – программа, которая делает копии самой себя. Ее вред заключается в захламлении компьютера, из-за чего он начинает работать медленнее. Отличительной особенностью червя является то, что он не может стать частью другой безвредной программы.Троянская программа (троянский конь, троян)Троянская программа маскируется в других безвредных программах. До того момента как пользователь не запустит эту самую безвредную программу, троян не несет никакой опасности. Тронская программа может нанести различный ущерб для компьютера. В основном трояны используются для кражи, изменения или удаления данных. Отличительной особенностью трояна является то, что он не может самостоятельно размножаться.
//Программа на языке паскаль:
program zagadka;
var s: String;
begin
writeln('Сидит девица в темнице, а коса на улице.');
readln(s);
while(s <> 'Морковь')
do begin
writeln('Не угадал. Попробуй еще раз');
readln(s);
end;
writeln('Правильно. Угадал!');
end.
/*
Описание:
Выводим пользователю загадку и просим его ввести ответ. Пока пользователь не угадает, просим его снова и снова вводить ответ, предварительно написав, что он ошибся. Как только мы получаем правильный ответ, программа выводит пояснение пользователю, где пишет, что тот угадал. Программа заканчивает свою работу.