Розписати формулу з математичного виду на вид MS Excel для її вирішення, використовуючи формулу «ЕСЛИ»:

используется язык pascal

program pr;

var

  mas: array[1..7] of integer;

  i: integer;

begin

writeln('вводим значения в массив');

  for i: =1 to 7 do readln (mas[i]);

writeln('выводим значения из массива');

  for i: =7 downto 1 do writeln(mas[i]);

readln;

end;

ха-ха-ха)) учебник по информатике за 10

там все

программа №4

program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end.

потхоньку буду дополнять, не так все быстро)) 

№5

program р_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end. 

в си:

# include < stdio.h> # include < conio.h> void main ()  {

    clrscr();

    int x,y,c,k;

    printf("vvedite x \n");  

    scanf("%d",& x);

    printf("vvedite y \n");  

    scanf("%d",& y);

    printf("vvedite c \n");  

    scanf("%d",& c);

    k=x+(y/(2*c));

    printf("otvet: %d \n",k);

    getch();

  }

по углам комнаты расставить 4 стула и   около каждой стены по одному ( ещё 4 стула). всего 8 стульев : )