Program m1;
Var x,n,i:integer;
begin
Readln (x,n);
For i:=1 to n do begin
x:=x*x;
end;
Write ('x=',x);
readln;
end.
С помощью Планшета графического можно создавать текстовые и графические документы
Сканером так же можно получить текстовые и графические
Вор варует - хакер взламывает
Вирусболезнь это живое - вирус компьютерный не живое
Попробуй что-то типо такого
Н-1
О-4
И т.д и т.п
14сит