Даны три действительных числа. выбрать из них те, которые принадлежат интервалу (1,3) reshit' po paskalu

WoRT1 WoRT1    2   17.05.2019 15:20    0

Ответы
oleg410 oleg410  30.09.2020 19:28

var
a,b,c:real;
begin
readln(a,b,c);
if (a>1) and (a<3) then writeln(a);
if (b>1) and (b<3) then writeln(b);
if (c>1) and (c<3) then writeln(c);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика