Составьте алгоритм возведения четного числа в квадрат, а нечетного в куб (язык программирования - qbasic)

язык с++

Объяснение:

#include <iostream>

using namespace std;

int main() {

setlocale(LC_ALL, "ru");

int number[15] = {4,6,8,10,12,14,16,18,20,22,24,26,28,30,32 };

cin >> number[0];

 printf("%d\n", number[0]);

 printf("%d\n", number[1]);

 printf("%d\n", number[2]);

 printf("%d\n", number[3]);

 printf("%d\n", number[4]);

 printf("%d\n", number[5]);

 printf("%d\n", number[6]);

 printf("%d\n", number[7]);

 printf("%d\n", number[8]);

 printf("%d\n", number[9]);

 printf("%d\n", number[10]);

 printf("%d\n", number[11]);

 printf("%d\n", number[12]);

 printf("%d\n", number[13]);

 printf("%d\n", number[14]);

 

 

 system("pause");

}

Program F1;

var x,y:integer;

begin

x:=10;y:=20;

if x > y then

 begin x:=1; y:=2 end

         else begin x:=2; y:=1;end;

writeln(x,' ',y);

end. 2 1

Пояснення. Виконуються оператори, що стоять після else, а потім writeln

Program F2;

var x,y:integer;

begin

x:=10;y:=20;

if x < y then

  begin x:=1; y:=2 end

         else begin x:=2; y:=1;end;

writeln(x,' ',y);

end. 1 2

Пояснення. Виконуються оператори, що стоять після then, а потім writeln

Program F3;

var x,y:integer;

begin

x:=10;y:=20;

if x < y then

  begin x:=1; y:=2 end

         else x:=2; y:=1;

writeln(x,' ',y);

end. 1 1

Пояснення. Виконуються оператори, що стоять після then, а потім y:=1 та writeln. Оператор y:=1 виконується, бо він не відноситься до else

Program F4;

var x,y:integer;

begin

x:=10;y:=20;

if x < y then

  begin x:=1; y:=2 end

         else begin x:=2; y:=1; end;

x:=0; y:=0;

writeln(x,' ',y);

end.