Написать программу, которая в одномерном массиве, заданном вводом с клавиатуры вычисляет среднее арифметическое массива без максимального и минимального элемента массива.
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.
/*
Описание:
Выводим пользователю загадку и просим его ввести ответ. Пока пользователь не угадает, просим его снова и снова вводить ответ, предварительно написав, что он ошибся. Как только мы получаем правильный ответ, программа выводит пояснение пользователю, где пишет, что тот угадал. Программа заканчивает свою работу.