Может быть 1, так как 3 буква гласная-а и последняя буква согсасная-н
Uses crt;
var a,b:integer;
begin
writeln('введите первое число');
readln(a);
writeln('введите второе число');
readln(b);
if a>b then writeln(a-b,' первое число больше второго');
if a<b then writeln(b-a,' второе число больше первого');
if a=b then writeln('0 оба числа равны');
end.
9
код на vbscript
Sub Zadanie18007865()
A = 2
B = 3
A = A * B
B = A + B
C = 2 * B / A * 3
MsgBox c
End Sub
Call Zadanie18007865()
12=1100
523=1000001011
76=1001100
221=11011101
Первым изобретателем, механических счетных машин, стал гениальный француз Блез Паскаль. Сын сборщика налогов, Паскаль задумал построить вычислительное устройство, наблюдая бесконечные утомительные расчеты своего отца. В 1642 г., когда Паскалю было всего 19 лет, он начал работать над созданием суммирующей машины. Паскаль умер в возрасте 39 лет, но, несмотря на столь короткую жизнь, навечно вошел в историю как выдающийся математик, физик, писатель и философ. В его честь назван один из самых распространенных современных языков программирования.
Суммирующая машина Паскаля, «паскалина», представляла собой механическое устройство - ящик с многочисленными шестеренками. Всего приблизительно за десятилетие он построил более 50 различных вариантов машины. При работе на «паскалине» складываемые числа вводились путем соответствуюшего поворота наборных колесиков. Каждое колесико с нанесенными на него делениями от 0 до 9 соответствовало одному десятичному разряду числа - единицам, десяткам, сотням и т. д. Избыток над 9 колесико «переносило», совершая полный оборот и продвигая соседнее слева «старшее» колесико на 1 вперед. Другие операции выполнялись при помощи довольно неудобной процедуры повторных сложений.