Регистрация
nekitpundya2256
04.07.2022 01:42
Информатика
Есть ответ 👍

Составить программу на алгоритмическом языке Кумир

222
398
Посмотреть ответы 2

Ответы на вопрос:

bbb87
bbb87
4,7(33 оценок)

Кумир

Объяснение:

К-кабан

У-ужгород

М-мама

И-иван

Р- рыба

lera645
lera645
4,4(75 оценок)

 

  program zad1;

uses crt;

var alfa,a,b,s: real;

begin

      clrscr;

      write('введите сторону a: ');

 

      readln(a);

      write('введите сторону b: ');

      readln(b);

      write('введите угол между сторонами: ');

      readln(alfa);

      s: =0.5*a*b*sin(alfa);

        writeln;

 

        writeln('площадь треугольника равна: ',s: 3: 3);

      readkey;

 

  end.

 

 

program zad2;

uses crt;

var s: string[5];

        c: char;

  begin

      clrscr;

      write('введите пятизначное число: ');

 

      readln(s);

      c: =s[3];

      s[3]: =s[2];

      s[2]: =c;

        writeln('выходное число: ',s);  

      readkey;

 

  end.

 

 

 

Популярно: Информатика