3. написать программу, в которой: a. запрашивается - вопрос №5131303 от esketit1 23.04.2021 13:20

Question

Информатика: 3. написать программу, в которой: a. запрашивается номер варианта студента, b. сравнивается введенная информация со значением строковой переменной (за-данным в программе), c. выводится на экран сообщение (совпал или не совпал номер).

esketit1 · Answer

Если в программе задан восьмой вариант

var
a:char;
i:integer;
begin
read(a);

if (a='Восемь'') or (ord(a)-48=8) then
writeln('Совпал')
else
writeln('Не совпал');
end.