Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1- ластик(eraser)
2-линия
3-контур
4-толкай(push)
5-повернуть(rotate)
6-рулетка
7-палитра
8-повернуть сцену(orbit)
9-лупа(zoom)
Объяснение:
решение на языке pascal
program pr;
var n,a,b,c, sum: integer;
begin
readln (n);
a: =n div 100;
b: =n mod 100 div 10
c: =n mod 10
sum: =a+b+c;
if sum mod 2 = 0 then writeln ('сумма цифр четная') else writeln('сумма цифр четная');
readln;
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
Популярные вопросы