Цикл for питон Даны два целых числа, причем неизвестно, какое из них больше. Вывести на экран все числа от первого до второго, включая границы промежутка.
Программа. var q,s:integer; begin s:=1; for q:=1 to 365 do s:=s+q; Writeln(s); end.
Описание программы. var q,s:integer; // Объявление переменных, где q - цикл от 1 до 365, s - сумма результата. begin // Начало выполнение программы. s:=1; // Присваиваем переменной s значение 1, т.к. по условию 1 рубль. for q:=1 to 365 do // Цикл от 1 до 365 s:=s+q; // Сумма цикла. То есть - Сумма = Сумма + Цикл с шагом 1. Начальное значение s равно 1, поэтому сумма считывается больше суммы предыдущего дня. Writeln(s); // Вывод результата. end. // Конец выполнение программы.
var q,s:integer;
begin
s:=1;
for q:=1 to 365 do
s:=s+q;
Writeln(s);
end.
Описание программы.
var q,s:integer; // Объявление переменных, где q - цикл от 1 до 365, s - сумма результата.
begin // Начало выполнение программы.
s:=1; // Присваиваем переменной s значение 1, т.к. по условию 1 рубль.
for q:=1 to 365 do // Цикл от 1 до 365
s:=s+q; // Сумма цикла. То есть - Сумма = Сумма + Цикл с шагом 1. Начальное значение s равно 1, поэтому сумма считывается больше суммы предыдущего дня.
Writeln(s); // Вывод результата.
end. // Конец выполнение программы.
ответ: г. char
Объяснение: Pos возвращает индекс первого вхождения подстроки в строке, Number не является функцией вообще, Ord возвращает код символа.
Задание 2ответ: конкатенация.
Задание 3ответ: 3
Объяснение:
Ord('H') = 72
Ord('E') = 69
72 - 69 = 3
Задание 4ответ: в
Объяснение:
В кодировке символы идут в порядке алфавита, то есть числа имеют закономерность возрастания:
Ord('A') = 65
Ord('B') = 66
..
Ord('X') = 88
...
Отсюда можем сделать вывод, что все условия, имеющие условие:
('A' > 'B') = (65 > 66)
('C' < 'B') = (67 < 66)
('X' > 'Y') = (88 > 89) отпадают.
Остаётся лишь вариант ('A' < 'B') and ('X' < 'Y')