Deniskotvitsky6422
?>

Дан треугольник со сторонами a, b, c. определите периметр треугольника, если известно, что a=5, b=2, c=3​

Информатика

Ответы

Сергеевна-Иван1045

если нужно в c++, то

#include "iostream"

using namespace std;

int main()

{

int a=5;

int b=2;

int c=3;

int p;

p=a+b+c;

cout < < p;

return 0;

}

Zashchitin Denis

1)

var

a: array [1..5,1..10] of integer;

i,j,p: integer;

begin

for i: =1 to 5 do 

begin

for j: =1 to 10 do

begin

a[i,j]: =random(50)+1;

write(a[i,j]: 3);

end;

writeln;

end;

writeln('меняем 1 и последнюю строки');

for j: =1 to 10 do

begin

p: =a[1,j];

a[1,j]: =a[5,j];

a[5,j]: =p;

end;

for i: =1 to 5 do 

begin

for j: =1 to 10 do

write(a[i,j]: 3);

writeln;

end;

end.

2)

var a: array [1..5, 1..10] of integer; i, j: integer; p: real;

begin for i : = 1 to 5 do begin for j : = 1 to 10 do begin a[i, j] : = random(50) + 1; write(a[i, j]: 3); end; writeln; end; writeln('произведения элементов строк'); for i : = 1 to 5 do begin p : = 1; for j : = 1 to 10 do p : = p * a[i, j]; writeln(p: 25: 0); end; end.

Галстян874

1)

var

a,b,x,y: real;

begin

readln(a,b);

x: =(a+b)/2;

y: =2*a*b;

if a> b then

begin

a: =y;

b: =x;

end

else

begin

a: =x;

b: =y;

end;

writeln('a=',a: 8: 3);

writeln('b=',b: 8: 3);

end.

2)

var

d,m: integer;

begin

readln(d,m);

if (d< 1) or (d> 31) then writeln ('день введен неверно');

if (m< 1) or (m> 12) then writeln ('месяц введен неверно');

end.

3)

var 

a,b,c: integer;

begin

readln(a,b,c);

if (a> b) and (a> c) then writeln(a);

if (b> a) and (b> c) then writeln(b);

if (c> a) and (c> b) then writeln(c);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дан треугольник со сторонами a, b, c. определите периметр треугольника, если известно, что a=5, b=2, c=3​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

ooofishai4064
Кислинская1055
Borisovna24
MAXIM76748
yakovlevasvetlanalvovna209
fedchenkoofficial
vova00831
menesmir
Кислинская1055
denisrogachv
ivanpetrovichru1801
Кириллов57
andreykrutenko
Сергеевич1907
oksana77768