1

Тема: Функція

Як виправити ?
Видає помилку E2010 Incompatible types:'Integer' and 'Extended'

function Kvadrat.Diagonal(t1,t2,t3,t4: Integer):integer;
begin
    a:=t1; b:=t2; c:=t3; d:=t4;
    result := a * sqrt(2);                     
end;

2

Re: Функція

Як виправити - залежить від того, що ви хочете отримати. Спробую попрацювати телепатом: вам треба, щоб поверталася діагональ; але діагональ в квадрата з цілими сторонами ніколи не буде цілою, тому напишіть

function Kvadrat.Diagonal(t1,t2,t3,t4: Integer):real;

або extended, за смаком.

3

Re: Функція

Видає іншу помилку якщо поміняти на real або extended
Declaration of 'Diagonal' differs from pervious declaration

4

Re: Функція

Е, дядьку, так недобре. А погуглити? Там у вас вище прототип лишився від попередньої

5

Re: Функція

І що тут вам не зрозуміло?

6

Re: Функція

Нічого

7

Re: Функція

Пане, це ви код писали?

8

Re: Функція

Так

9

Re: Функція

Тоді яким чином ви не знаєте, що заголовок методу Kvadrat.Diagonal в двох місцях записаний?

10

Re: Функція

Та я знаю

11

Re: Функція

Ну і що ви робите на цьому форумі, якщо плесканя однієї долоні чуєте?