Pascal ABC
Program 1;
Var a,b,c: real; Begin writeln('введите 1 катет= '); readln(a); writeln('введите 2 катет= '); readln(b); c:=SQRT(a*a+b*b); writeln('гипотенуза= ,c'); End. Вот например эта запись. Вроде все правилно. Когда ввожу катеты гипотенузу не считает. Что не так? |
Часовой пояс GMT +4, время: 16:37. |
Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.