Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
qbasic:
input "число а=", a
x = a
do
x = x ^ 2 + 1
n = n + 1
loop until x > = 1000000
print a, x, n
max(n) = 7, при a = 0
решение на
иванов парикмахер, петров плотник, сидоров мельник, гришин почтальон, алексеев маляр. и 2413 маляр 1
п 142 мельник 2
с 13 плотник 3
г 12 почта 4
а парикмахер 5
var
a: integer;
begin
readln(a);
writeln(a*(a div 10 + (a mod 10)*10));
end.
Популярные вопросы