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