Дан массив состоящ из 15 целых чисел,заполненых случ.образом в промежутке от -10 до 10.найти максимальный элемент и заменить его значение на 50 pascal
156
248
Ответы на вопрос:
Var a: array[1..15] of integer; max,i: integer; begin for i: =1 to 15 do begin readln(a[i]); if a[i]> max then max: =a[i]; end; writeln(max); end.
Frac (15.6) = 0.6 - функция выделяет дробную частьtrunc(24.9) = 24 - функция выделяет целую частьв результате получим 24.6
Популярно: Информатика
-
podgainiyroma06.11.2021 00:14
-
DogyStyleee11.09.2021 21:54
-
vika208412.04.2020 21:15
-
Ученик1209030.11.2020 22:20
-
gumarin7801.10.2020 09:06
-
stik624.07.2021 13:33
-
Blazethecat21807.01.2022 01:03
-
Lovecoffe77721.03.2022 04:17
-
Диана240403.04.2023 22:41
-
кика2005108.12.2022 13:36