Составить алгоритм нахождения произведения целых нечетных чисел от 1 до 100.
Извини, я на украинском не могу)
Буду приводить аналогию на паскале.
В основе будет лежать "двойной" цикл. (for i:=1 to 100 do for j:=1 to 100 do...)
В первом цикле мы проверяем делится ли "i" на 2 (If i mod 2=0).
Если да(четное), тогда берем след число. Если нет(нечет), то запускаем второй цикл:
(For J:=1 to 100)
В нем мы тоже проверяем число на нечетность. Если число нечетное, тогда у нас есть уже 1ое произведение! "i" - Это первый множитель. "j" - второй. i*j - само произведение. Его можно вывести на экран (writeln(i*j)).
Получается мы берем по-порядку каждое число от 1 до 100, если оно нечетное, тогда по очереди умножаем его на каждое нечетное число, опять же, от 1 до 100.
На паскале:
For i:=1 to 100 do
If i mod 2<>0 then
for j:=1 to 100 do
if j mod 2<>0 then writeln(i*j);
Могут встречаться повторы (3*9 и 9*3)
а), б)
var a, b, c: char;
begin
writeln('Введите 3 символа');
readln(a, b, c);
writeln('Результат сцепления: ', a+b+c);
if a>b then writeln(a,'>', b);
if a>c then writeln(a,'>', c);
if a=b then writeln(a, '=', b);
if a=c then writeln(a, '=', c);
if a<b then writeln(a, '<', b);
if a<c then writeln(a, '<', c);
if b>c then writeln(b, '>', c);
if b<c then writeln(b, '<', c);
end.
в)
var a, b: char;
begin
writeln('Введите 2 символа');
readln(a, b);
if a>b then writeln(b,' ', a);
if a<b then writeln(a,' ', b);
if a=b then writeln(a,' ', b);
end.
