задача

@GGhost · Регистрация: 17.10.2013

Author24 — интернет-сервис помощи студентам

Привет
не могу решить задачу
с формулой
(a+b)/c^2
как бы ни записывал пишет ошибку.
могли бы написать код правильный? я писал так

Delphi

var
y,a,b,c:integer;
begin
write('vvedite a');
readln(a);
write('vvedite b');
readln(b);
write('vvedite c');
readln(c);
y:=(a+b)/c^2; - < (a+b)/sqrt(c); 
write(y);
readln;

не получается

Добавлено через 10 минут
Все, заметил ошибку, вместо integer нужно было real ставить, не увидел

Delphi

var
y,a,b,c:real;
begin
write('vvedite a');
readln(a);
write('vvedite b');
readln(b);
write('vvedite c');
readln(c);
y:=(a+b)/sqrt(c);
write('Otvet=',y);
readln;
end.

@Samhain · 17.10.2013, 23:16

GGhost, sqrt - квадратный корень, а у Вас c в квадрате, следовательно, должно быть sqr(с).

@Samhain 696 / 570 / 414 Регистрация: 31.03.2013 Сообщений: 1,029
	17.10.2013, 23:16	2
	GGhost, sqrt - квадратный корень, а у Вас c в квадрате, следовательно, должно быть sqr(с). 0