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*
Комментарий*

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

tatasi
Наталья_Васищев
fedchenkoofficial
Исаченко Тераски1181
Gradus469
natkoff5
MaratФам
Chikichev456
reinish23
Anna-Miron
bhg50
magazin3000
Шиморянов Мария1866
с Кумиром... Не понятно ничего...
s-shulga
istok11