Определите, при каком наибольшем введённом значении переменной s программа выведет число , с подробным объяснением, готовлюсь к егэ.
166
299
Ответы на вопрос:
1)
var
i, mx, num:integer;
begin
mx:=-1;
for i:=1 to 3 do
begin
readln(num);
if num>mx then
mx:=num
end;
write(mx);
end.
2)
var a, b, c:integer;
begin
write('Введите сторону а: ') ;
readln(a) ;
write('Введите сторону b: ') ;
readln(b) ;
write('Введите сторону c: ') ;
readln(c) ;
if (a+b<c) or (b+c<a) or (c+a<b) then
write('Такого треугольника не существует')
else
write('Такой треугольник существует') ;
end.
Популярно: Информатика
-
kreker12808.07.2022 01:45
-
albina100202.07.2022 19:31
-
Pev1211200326.05.2022 05:11
-
Polhova160623.03.2022 07:30
-
WiTaMiN11117.01.2023 13:17
-
makssssimfrank07.04.2023 12:55
-
zolotuk12328.05.2022 18:13
-
lybchikfreed03.02.2020 18:33
-
polinadorokhova20.02.2020 08:12
-
mashkasuper102.07.2020 02:11