пожежа!!!
Тип переменных для параметра цикла for:
•ветвление
•целочислительный тип
•натуральный
• логический
237
326
Ответы на вопрос:
Unit maxmod; interface function maxmod2(a,b: real): real; implementation function maxmod2(a,b: real): real; begin if abs(a)> abs(b) then maxmod2: =a else maxmod2: =b end; end. компилируем в maxmod.tpu и пишем тестовую программу uses maxmod, crt; var x,y: real; begin clrscr; read(x,y); writeln(maxmod2(x,y)); readkey end.
Популярно: Информатика
-
reegiinaaa22.09.2021 09:23
-
окткл01.06.2021 11:00
-
knowyourway5409.04.2023 11:24
-
vladamalaxova24.12.2021 19:30
-
Sverona04.11.2021 17:52
-
Pro100god32229.06.2020 16:24
-
yana1410200407.02.2022 02:40
-
serduk35205.11.2020 07:49
-
jdhhdd01.08.2020 11:00
-
eldarosmanov30.07.2022 22:24