Предмет: Информатика,
автор: Аноним
9 класс информатика напишите как знаете только напишите
Приложения:
Ответы
Автор ответа:
1
Странно. Уже решал такой набор задач, только с другими данными:
Задача №1
//PascalABC.NET (версия 3.1, сборка 1198)
var
x: integer;
y: biginteger;
begin
x:=readlninteger('Введите Х ');
y := sqr(x) * sqr(x) * sqr(x);println(y);
y := sqr(y)/sqr(x);println(y);
y := y * sqr(x) * sqr(x) * x;println(y);
y := y * sqr(x) * sqr(x);println(y);
end.
Тестовое решение:
Введите Х 2
64
1024
32768
524288
Задача №2
//PascalABC.NET (версия 3.1, сборка 1198)
var
a, b, c: integer;
begin
writeln('Введите 3 числа');
readln(a, b, c);
swap(a, b);swap(a, c);
println(a, b, c);
end.
Тестовое решение:
Введите 3 числа
2 3 4
4 2 3
Задача №1
//PascalABC.NET (версия 3.1, сборка 1198)
var
x: integer;
y: biginteger;
begin
x:=readlninteger('Введите Х ');
y := sqr(x) * sqr(x) * sqr(x);println(y);
y := sqr(y)/sqr(x);println(y);
y := y * sqr(x) * sqr(x) * x;println(y);
y := y * sqr(x) * sqr(x);println(y);
end.
Тестовое решение:
Введите Х 2
64
1024
32768
524288
Задача №2
//PascalABC.NET (версия 3.1, сборка 1198)
var
a, b, c: integer;
begin
writeln('Введите 3 числа');
readln(a, b, c);
swap(a, b);swap(a, c);
println(a, b, c);
end.
Тестовое решение:
Введите 3 числа
2 3 4
4 2 3
Автор ответа:
1
1.
y=x*x*x; y=y*y (получится y=(x³)²=x⁶)
y=x*x; y=y*y; y=y*x; y=y*y (y=(x²x²x)²)
x3=x*x*x; y=x3*x3; y=y*y*x3 (y=(x³)²(x³)²(x³))
y=x*x*x; y=y*y*y; y=y*y; y=y*x (y=((x³)³)²x)
2.
d=c; c=b; b=a; a=d
y=x*x*x; y=y*y (получится y=(x³)²=x⁶)
y=x*x; y=y*y; y=y*x; y=y*y (y=(x²x²x)²)
x3=x*x*x; y=x3*x3; y=y*y*x3 (y=(x³)²(x³)²(x³))
y=x*x*x; y=y*y*y; y=y*y; y=y*x (y=((x³)³)²x)
2.
d=c; c=b; b=a; a=d
Похожие вопросы
Предмет: Математика,
автор: katya2010zaharova
Предмет: Английский язык,
автор: AnastasiaPrutula
Предмет: Биология,
автор: spaydispaidi
Предмет: Другие предметы,
автор: rakiway
Предмет: Математика,
автор: Cnegovik2010