irina-mic
?>

С! даны три числа. удвоить их, если они целые, иначе нецелые заменить их целыми частями.

Информатика

Ответы

Eduardovich

PascalABC.NET

1. Решение с простыми переменными

begin

 var (a, b, c) := ReadReal3('Введите три числа:');

 if Frac(a) = 0 then

   a *= 2

 else

   a := Trunc(a);

 if Frac(b) = 0 then

   b *= 2

 else

   b := Trunc(b);

 if Frac(c) = 0 then

   c *= 2

 else

   c := Trunc(c);  

 Println(a, b, c)

end.

2. Продвинутое решение

begin

 ReadSeqReal('Введите три числа:', 3)

   .Select(p -> Frac(p) = 0 ? p * 2 : Trunc(p)).Println;

end.

secretar62
Смотря в какой кодировке.
Если кодировка КОИ-8, значит один символ кодируется, то есть весит 8 бит. И так всегда.
Значит:
2000символов×8бит=16000бит=16000:8=2000байта(так как что бы перевести биты в байты, нужно разделить кол-во битов на 8, а что бы перевести в килобайты, нужно ещё разделить и на 1024).Но тут в килобайты перевести нельзя. Невозможно.
размер сообщения в кодировке КОИ-8.
Если же кодировка Unicode, то это значит, что один символ кодируется, то есть весит 16 бит.
Значит:
2000символов×16бит=32000бит=32000:8=4000байт. Как и в первом случае, перевести тут в килобайты нельзя. Невозможно.
размер сообщения в кодировке Unicode.
modellisimo-a

ЖарайдыКестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.Кестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.Кестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.Кестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.Кестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.Кестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.Кестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.Кестеде органикалық заттар мен олардың маңыздылығын көрсететін ақпарат берілген. Кестені қажетті ақпаратпен толықтыр.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

С! даны три числа. удвоить их, если они целые, иначе нецелые заменить их целыми частями.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

sergei-pletenev
AntonovaAvi1716
zaravshan20134
znaberd786
suhanowaswetlana
Кирилл-Анна1023
федороа
Designer
PivovarovaIlina1437
info126
char40
Kisuha8465
konss2
лукашова940
art-03857