Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
пиксельных 8-битных
Объяснение:
потому что чтобы сделать по шаговаю анимацию лучше и легче сделать пиксельным
program naoborot;
uses crt;
var n,a,b: integer;
begin
clrscr;
write('введите натуральное число: ');
readln(x);
n: =x;
while n> =1 do
a: =n mod 10;
n: =n div 10;
b: =b*10+a;
end;
write('прочтение цифр числа справа налево: ',b)
end.
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
Популярные вопросы