3. Запишите программный код вычисления значения функции х2, если х< 0
у =
х + 7, если х >= 0
x = int(input(“введите х:”))
4. Запишите программный код вывода чисел от 1 до числа, введенного с клавиатуры, с использованием цикла с параметром.
Критерии оценивания № задания Дескриптор
Определяет системное, прикладное программное обеспечение и системы программирования
1 дает определение термина «Системное ПО» 1
дает определение термина «Прикладное ПО» 1
дает определение термина «Системы программирования» 1
2 определяет программы и категорию ПО 1
Использует структуру ветвления в программном коде
3 записывает условие 1
записывает оператор при выполнении условия 1
записывает оператор при невыполнении условия 1
Использует циклическую структуру в программном коде
4 записывает оператор ввода числа с клавиатуры 1
записывает цикл с параметром 1
записывает оператор вывода числа 1
записывает выражение для изменения параметра 1
Всего 11
number = int(input())
last_number = 0
even = 0
odd = 0
while (number > 0):
last_number = number % 10
if (last_number % 2 == 0):
even += 1
else:
odd += 1
number //= 10
print("Even = ", even, "Odd = ", odd)
Объяснение:
number = int(input()) // Объявление + ввод переменной
last_number = 0 // Переменная для хранения последней цифры числа
even = 0 // Количество четных
odd = 0 // Количество нечетных
while (number > 0): // Пока число > 0
last_number = number % 10 // Получаем последнюю цифру числа
if (last_number % 2 == 0): // Если цифра делится на 2 без остатка
even += 1 // В переменную even делаем + 1
else: // Иначе
odd += 1 // В переменную odd делаем + 1
number //= 10 // Удаляем последнюю цифру числа
print("Even = ", even, "Odd = ", odd) // Вывод
1) program Array16;
var
i:integer; // счетчик в цикле
N:integer;
a: array [1..10] of integer;
begin
writeln('Введите N (N<10)');
readln(N); // ввод размера массива
for i:=1 to N do
begin
write('a[',i,']=');
readln(A[i]); // ручной ввод значений массива
end;
writeln('Результат');
for i:=1 to N do
begin
// вычисление и вывод элементов в указанном порядке
write(' ',a[(i div 2+1)*((i) mod 2)+ n*((i+1)mod 2)-((i div 2)-1)*((i+1) mod 2)]);
end;
end.
2) Var A:array[1..100] of integer;
i,n:byte;
Begin
write('Введите n<=100: ');readln(n);
For i:=1 to n do
Begin
A[i]:=random(31);
write(A[i]:3);
End;
writeln;
For i:=1 to n div 2 do
write(A[i]:3,A[n-i+1]:3);
if n mod 2 <>0 then write(A[n div 2+1]:3);
End.