Ответы на вопрос:
var x1,x2,x3,x4,x5: integer;
s: real;
begin
read(x1,x2,x3,x4,x5);
s: = (x1+x2+x3)/(x4+x5);
if round(s)=s then writeln("celoe - "s);
end.
Популярно: Информатика
-
егормай16.06.2021 17:26
-
kiryanovavichk29.09.2020 16:14
-
наиб328.07.2022 06:44
-
alinarostova6610.04.2021 00:24
-
kshig10.11.2020 01:23
-
IhaveAbrains15.02.2020 07:33
-
irazatula0525.06.2020 18:25
-
ebotalov27.07.2020 23:28
-
froxxxy24.06.2020 22:05
-
vitlikkushnirp08qv415.08.2022 17:50