Информатика «Программирование разветвляющихся алгоритмов»…

Question

Информатика «Программирование разветвляющихся алгоритмов» 1. Написать программу, определяющую по длинамсторон A. B. C, является ли треугольник равнобедренным.

Answer 1

80

sokolmask

31 марта 2023

var a,b,c,r,x,y: integer; Begin read (a,b,c); if (a=b) or (a=c) or (b=c) then writeln ('Ravnobedrennyj'); read (a,r); if (a*a>pi*r*r) then writeln ('Kvadrat bolshe') else writeln ('Krug bolshe'); read (x,y); if x>y then writeln (y*y,',x*x*x,', (x+y) /2); else writeln (x*x,',y*y*y,', (x+y) /2); End.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: