Введите ** языке Pascal. Программа предлагает перевести ** русский язык английское слово...

0 голосов
53 просмотров

Введите на языке Pascal.
Программа предлагает перевести на русский язык английское слово Windows и ввести ответ с клавиатуры. Если ответ верен (введено "окна"), то вывести на экран фразу "Молодец! Верно", иначе - вывести "неверно!".


Информатика (19 баллов) | 53 просмотров
Дан 1 ответ
0 голосов

Begin
WriteLn('Переведи слово "Windows" на русский:');
if(ReadString().ToLower() = 'окна') then // Функция "ToLower()" "опускает" регистр букв. То есть если вы введёте "ОкНа", программа засчитает ответ.
WriteLn('Молодец! Верно')
else
WriteLn('Неверно!');
end.

(614 баллов)