1.
<h3>Код (Pascal)</h3>
var
x: integer;
begin
read(x);
writeln((x + 1) div 2);
end.
--------------------
Прикреплён во вложениях.
2.
Давай "перевернём" условие с "НЕ" для понимания:
НЕ (число > 50) = (число <= 50)
- Рассмотрим число 123. Для него не выполняется условие НЕ (123 > 50) и не выполняется условие (123 чётное). Высказывание ложно, число подходит.
- Рассмотрим число 50. Для него выполняется условие НЕ (50 > 50). Высказывание истинно, число не подходит.
- Рассмотрим число 9. Для него выполняется условие НЕ (9 > 50). Высказывание истинно, число не подходит.
- Рассмотрим число 8. Для него выполняется условие НЕ (8 > 50). Высказывание истинно, число не подходит.
- Рассмотрим число 97. Для него не выполняется условие НЕ (97 > 50) и не выполняется условие (97 чётное). Высказывание ложно, число подходит.
Ответ: 123 97
определенно вариант 2 так как иы не опиываем жестами и насловно
Var
i:integer;
begin
Writeln('Число Квадрат');
i:=14;
while i<=24 do
begin Writeln(i:4,sqr(i):9); i:=i+2 end
end.
<em><u>Результат выполнения программы:</u></em>
Число Квадрат
14 196
16 256
18 324
20 400
22 484
24 576
Программа написана на Python 3.6
a = input().split() #Вводятся элементы через пробел
a = [float(i) for i in a]
a.append(min(a) - 1)
a.append(min(a))
iMax = a.index(max(a))
for i in range(len(a) - 1, iMax + 1, -1):
a[i], a[i - 1] = a[i - 1], a[i - 2]
a[iMax + 1] = int(input())
for i in range(len(a) - 1, iMax, -1):
a[i], a[i - 1] = a[i - 1], a[i - 2]
a[iMax] = int(input())
print(' '.join([str(i) for i in a]))
Var n:integer;
begin
writeln('Введите число');
read(n);
if (n>=1000) and (n<10000) and (n mod 5=0) then writeln('Удача');
end.