Ответ 4 так как если хорошо подумать то получится этот ответ
Var a:integer;
begin
readln(a);
if a mod 2=0 then a:=a*a
else a:=a*a*a;
writeln('a = ',a);
end.
Пример:
18
<span>a = 324</span>
Windows является графической операционной системой для компьютеров платформы IBM PC. <span>Ее основные средства управления – графический манипулятор (мышь или иной аналогичный) и клавиатура. Система предназначена для управления автономным компьютером, но также содержит все необходимое для создания небольшой локальной компьютерной сети (одноранговой сети) и имеет средства для интеграции компьютера во всемирную сеть </span>(Интернет).