Посчитайте сумму квадратов всех чисел, находящихся в полуинтервале [a, b) или [b, a), и выведите ее на экран.​

Это на 1ое

Program z1;

var a,b,c,max:integer;

begin

writeln(Введите 3 целых числа);

readln(a,b,c);

if agt;b then max:=a

else

if bgt;c then max:=b

else max:=c;

writeln(Наибольшее число = ,max);

end.

Это на 2ое

Program z2;

var a, b, c, d, e, max:integer; //задаем переменные целого типа

begin

write( введите первое число );  // вводим с клавиатуры 1-ое число

read(a);  

write( введите 2-ое число );  // вводим с клавиатуры 2-ое число

read(b);

write( введите третье число );  // вводим с клавиатуры третье число

read(c);

write( введите четвертое число );  // вводим с клавиатуры 4-ое число

read(d);

write( введите 5-ое число );  // вводим с клавиатуры 5-ое число

read(e);

if (agt;b)and(agt;c)and(agt;d)and(agt;e) then max:=a;  

if (bgt;a)and(bgt;c)and(bgt;d)and(bgt;e) then max:=b;

if (cgt;b)and(cgt;a)and(cgt;d)and(cgt;e) then max:=c;

if (dgt;b)and(dgt;c)and(dgt;a)and(dgt;e) then max:=d;

if (egt;b)and(egt;c)and(egt;d)and(egt;a) then max:=e;

write( наибольшее среди пяти чисел = , max);  // выводим ответ

end.

При переводе на язык Морзе каждый символ имеет свой код, отличающийся от кодов других символов, который состоит из 1 или более сигналов.

Количество вариантов кодов написания можно найти по формуле:

где N – количество вариантов; а – количество символов в алфавите (на который переводят); i – количество символов(сигналов) в коде.

Не более 5 сигналов, значит от 1 до 5 включительно.

Букв, которые кодируются 1 сигналом:

N=2¹=2

Букв, которые кодируются 2 сигналами:

N=2²=4

Букв, которые кодируются 3 сигналами:

N=2³=8

Букв, которые кодируются 4 сигналами:

N=2⁴=16

Букв, которые кодируются 5 сигналами:

N=2⁵=32

Нас интересует общее количество всех таких кодов:

2+4+8+16+32=62 варианта кода, значит 62 различных символа можно записать.

ответ: 62.