Питон
x=input()
y=input()
if x==';' and y=='*':
print('True')
else:
print('False')
Паскаль
var x,y:Char;
begin
readln(x);
readln(y);
if (x=';') and (y='*') then
writeln('True')
else
writeln('False');
end.
Объяснение:
program (название программы);
var x, y: char;
begin
Writeln ('Введите x');
Readln (x);
Writeln ('Введите y');
Readln (y);
if (x=';' & y='*')
then writeln ('true')
else writeln ('false');
end.
Питон
x=input()
y=input()
if x==';' and y=='*':
print('True')
else:
print('False')
Паскаль
var x,y:Char;
begin
readln(x);
readln(y);
if (x=';') and (y='*') then
writeln('True')
else
writeln('False');
end.
Объяснение: