Господа программисты и те кто хорошо шарит в Pascal'е , помогите мне с задачами. Нужно
Господа программисты и те кто хорошо шарит в Pascal'е , помогите мне с задачами. Нужнорешение срочно!
1.Составить наиболее краткий алгоритм вычисления на Pascal.
y=x^5
y=x^10
y=x^15
y=x^19
2. Составить алгоритм тройного обмена значениями переменных по схеме(на фотографии по номером 2)
Гость
Ответ(ы) на вопрос:
Гость Задание №1
//PascalABC.NET (версия 3.1, сборка 1198)
var
x: integer;
y: biginteger;
begin
x:=readlninteger('Введите Х ');
y := sqr(x) * sqr(x) * x;println(y);
y := sqr(y);println(y);
y := y * sqr(x) * sqr(x) * x;println(y);
y := y * sqr(x) * sqr(x);println(y);
end.
Тестовое решение:
Введите Х 2
32
1024
32768
524288
Задание №2
//PascalABC.NET (версия 3.1, сборка 1198)
var
a, b, c: integer;
begin
readln(a, b, c);
swap(a, b);swap(a, c);
println(a, b, c);
end.
Тестовое решение:
1 2 3
3 1 2
Не нашли ответ?
Похожие вопросы