1. Напишите программу с цикла for. Программа будет выводить все числа от 1 до 100 кроме вашего возраста. Используйте команду continue 2. Напишите программу с цикла while, которая выводит экран факториал вашего возраста.
3. Есть программный код предназначенный для вывода сообщении "четное" или "не четное".
Дополните этот код
n= int(input('Введите число'))
if n%2==1:
print('Четное')
var
a: array [1..30] of Word;
i, c, sum: Word;
begin
Randomize;
for i := 1 to 30 do
a[i] := Random (76);
for i := 1 to 30 do
Write (a[i], ' ');
WriteLn;
for i := 1 to 30 do
if (a[i] >= 10) and (a[i] <= 35) then begin
Inc (c);
sum := sum + a[i];
Write (a[i], ' ')
end;
WriteLn;
WriteLn ('Кол-во чисел из диапазона [10; 35]: ', c);
Write ('Сумма чисел из диапазона [10; 35]: ', sum);
end.
Функция ЛЕВСИМВ() извлекает подстроку из заданной строки, начиная с левого символа.
Функция ПРАВСИМВ() возвращает последний символ или несколько последних символов текстовой строки на основе заданного числа символов.
Функция ДЛСТР() выполняет возвращение количество знаков в текстовой строке.
Функции НАЙТИ() находят вхождение одной текстовой строки в другую и возвращают начальную позицию искомой строки относительно первого знака второй строки.
Функция ЗАМЕНИТЬ(), замещает указанную часть знаков текстовой строки другой строкой текста.
Функция ПОДСТАВИТЬ() используется, когда нужно заменить определенный текст в текстовой строке.
Функция ПСТР() возвращает заданное число знаков из текстовой строки, начиная с указанной позиции.
Функция СЖПРОБЕЛЫ() используется для обработки текстов, полученных из других прикладных программ, если эти тексты могут содержать лишние пробелы.
Функция СЦЕПИТЬ() используется для объединения данных из двух или более ячеек в одну.
Объяснение: