Паук-парк-пара-фара-фура-мура-муха
Name=input('Введи имя:')
age=int(input('Введи возраст:')
date=2018-age
print(name, 'ты родился в', date)
a=int(input('первое число:')
b=int(input('второе число:')
print('сумма равна:', a+b)
<span>1. Для какого из данных слов истинно высказывание:
НЕ (оканчивается на мягкий знак) И (количество букв чётное)?
2) август - оканчивается не на мягкий знак и состоит из 6 - четного числа - букв
2. Для какого из приведённых имён ложно высказывание:
НЕ (Первая буква согласная) ИЛИ НЕ (Последняя буква гласная)?
2) Кристина - дизъюнкция (или) неверна, если неверны все операнды. Здесь неверно, что первая буква не согласная, и неверно, что последняя буква не гласная.
3. Для какого из данных слов истинно высказывание:
(оканчивается на мягкий знак) И НЕ (количество букв чётное)?
3) декабрь - конъюнкция (и) верна, если все операндцы истинны. Здесь верно, что слово оканчивается на мягкий знак и верно, что количество букв нечетное.
4.Для какого из приведённых имён истинно высказывание:
НЕ((Первая буква согласная) ИЛИ (Последняя буква гласная))?
1) Иван - если НЕ(...) истинно, то то, что в скобках - ложно. В скобках два утверждения, соединенные ИЛИ, значит, оба должны быть ложны.
5. Для какого из приведённых имён ложно высказывание:
(Третья буква гласная) ИЛИ НЕ (Последняя буква гласная)?
2) Татьяна
6. Для какого из приведённых чисел истинно высказывание: (число < 100) И НЕ (число чётное)?
3) 23
7. Для какого из приведённых значений числа X истинно высказывание: (X < 5) И НЕ (X < 4)?
4) 4 - действительно, 4 < 5, но неверно, что 4 < 4.
8. Для какого из приведённых имён истинно высказывание:
НЕ (Первая буква согласная) И НЕ (Последняя буква гласная)?
1) Юлиан
9. Для какого из приведённых значений числа X ложно высказывание: НЕ (X < 7) ИЛИ (X < 6)?
3) 6
10. Для какого из данных слов истинно высказывание:
НЕ (есть шипящие) И (оканчивается на гласную)?
Шипящие звуки — это [ж], [ш], [ч'], [щ'].
3) забота</span>
Var n,k : Integer;
Begin
k:=-1;
Readln(N);
While N>0 do
Begin
If (not Odd(N mod 10)) and ((N mod 10)>k) then k:=N mod 10;
N:=N div 10;
end;
If k=-1 then Writeln('не найдено') else Writeln(k);
end.