1.Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 8 и оканчивающихся на 6. Программа получает на вход
натуральные числа, количество введённых чисел неизвестно, последовательность чисел
заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 1000. Введённые числа не превышают 30000.
Программа должна вывести одно число: сумму всех натуральных чисел, кратных 8 и
оканчивающихся на 6.
2.16. Напишите программу, которая в последовательности натуральных чисел определяет
количество чисел, кратных 3. Программа получает на вход количество чисел в
последовательности, а затем сами числа. В последовательности всегда имеется число,
кратное 3. Количество чисел не превышает 100. Введённые числа не превышают 300.
Программа должна вывести одно число — количество чисел, кратных 3.
3. Напишите программу, которая в последовательности натуральных чисел определяет
сумму всех чисел, кратных 4 и оканчивающихся на 8. Программа получает на вход
натуральные числа, количество введённых чисел неизвестно, последовательность чисел
заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 100. Введённые числа не превышают 300. Программа
должна вывести одно число: сумму всех чисел, кратных 4 и оканчивающихся на 8.
4. Напишите программу, которая в последовательности натуральных чисел определяет
максимальное число, оканчивающееся на 2.
Программа получает на вход количество чисел в последовательности, а затем сами
числа. В последовательности всегда имеется число, оканчивающееся на 2.
Количество чисел не превышает 1000. Введённые числа не превышают 30 000.
Программа должна вывести одно число — максимальное число, оканчивающееся на 2.
5.53. Напишите программу, которая в последовательности натуральных чисел определяет
количество чисел, кратных 6 и оканчивающихся на 4. Программа получает на вход
количество чисел в последовательности, а затем сами числа. Количество чисел не
превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна
вывести одно число: количество чисел, кратных 6 и оканчивающихся на 4.
ответ:1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var
Chislo, Count, Summa, n: integer;
begin
Summa := 0;
Count := 0;
readln(Chislo);
while Chislo > 0 do
begin
n := Chislo mod 10;
if odd(n) then
begin
Summa := Summa + n;
inc(Count);
end;
Chislo := Chislo div 10;
end;
writeln('Сумма нечетных цифр числа: ', Summa);
writeln('Кол-во нечетных цифр числа: ', Count);
writeln('Среднее арифметическое нечетных цифр: ', Summa / Count);
end.
Объяснение:
a = input("Введите текущую координату фигуры(вертикаль): ")
b = input("Введите текущую координату фигуры(горизонталь): ")
c = input("Введите координату для хода(вертикаль): ")
d = input("Введите координату для хода(горизонталь): ")
# Условие
if (a==c) and (b==c):
#Конец условия
print("Фигура может сделать ход")
else:
print("Фигура НЕ может сделать ход")
Условия:
а) if (a==c) and (b==c): #ладья
б) if abs(a-c) == abs(b-d): #слон
в) if abs(a-c)==1 or abs(b-d)==1: #король
г) if abs(a-c) == abs(b-d) or a == c or b == d: #ферзь
ж) if((abs(abs(a-c)-2)<0.5) and (abs(abs(b-d)-1)<0.5)
or (abs(abs(a-c)-1)<0.5) and (abs(abs(b-d)-2.0)<0.5)): #конь