ПОМОГИТЕ ПОЖАЛУЙСТА!!!Подобрать 3 задачки по программированию: 1. обычная линейная программка

ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Подобрать 3 задачи по программированию: 1. обычная линейная программка 2. программка с оператором IF-Then-Else 3. программка с циклом For....to....do

Задать свой вопрос
1 ответ
1)var a:integer;
begin
readln(a);
a:=a^a;
writeln('Квадрат данного числа равен',a);
end.
2)var a:integer;
begin
readln(a);
if odd(a)=true then writeln('Нечётное') else writeln('Чётное');
end.
3)var a,b:integer;
begin
readln(a);
for b:=1 to a do
a:=a*a;
writeln('Нечто:',a);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт