написать программу в паскале)) вычислить x⁸
5-9 класс
|
var
x,r:integer;
begin
read(x);
r:=1;
r:=x*x*x*x*x*x*x*x;
writeln(r);
end.
или
var
i,x,r:integer;
begin
read(x);
r:=1;
for i:=1 to 8 do
r*=x;
writeln(r);
end.
Другие вопросы из категории
б)if 0<x<2
then if y<1 then y=y+3 else y:=y²
else y:=sqr(y)
в)if 1<x<2
then
x:=x+1;y:=0;
else
x:=0;y:=y+1;
г)if 1<x and x>2
then begin x:=x+1;y:=0 end;
else begin x:=0;y:=y+1 end
решение.СРОЧНО!!!,СРОЧНО!!
Программа Паскаль
Читайте также
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
1. Написать программу нахождения произведения n чисел.
расположденных по диагонали
3.Написать программу рисующую горизонтальную цепочку из 12 кругов,каждый круг должен на половину закрывать предыдущий
Помогите,а то сижу с паскалем уже час с лишним и все никак не получается..
Заранее спасибо)