Регистрация
Neymar3110
18.07.2021 05:49
Информатика
Есть ответ 👍

Pascal информатика. определить лежит ли число в диапазоне (-30,60) , 15

171
401
Посмотреть ответы 3

Ответы на вопрос:

AWIKOZA
AWIKOZA
4,6(94 оценок)
Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin   if readreal.between(-30,60) then writeln('входит')   else writeln('не входит') end.
aveter256
aveter256
4,7(70 оценок)
Var a: integer; begin read(a); if (a> -30) and (a< 60) then write('yes') else write('no'); end.
Tanya22rus
Tanya22rus
4,6(67 оценок)

Відповідь:

#include<iostream>

#include<cmath>

int main(){

short a,b,c,minimum,maximum;

std::cin>>a>>b>>c;

minimum = std::min(a,std::min(b,c));

maximum = std::max(a,std::max(b,c));

if(minimum>0) minimum=0;

if(maximum<0) maximum=0;

std::cout<<abs(minimum*2)+abs(maximum*2);

return 0;}

Популярно: Информатика