Категория
Информатика, опубликовано 01.02.2019 01:40

Подсчитать количество целых чисел среди чисел a,b,c.

Ответы

Ответ
Ответ оставил: Гость
1) is, am 2)is , is 3) is , is 4) are, am, am 5) is , is
Ответ
Ответ оставил: Гость

var

  a, b, c : real;

  count : byte;

begin

  read (a, b, c);

  count : = 0;

  if frac (a) = 0 then inc (count);

    if frac (b) = 0 then inc (count);

  if frac (c) = 0 then inc (count);

  writeln (count);

end.

Ответ
Ответ оставил: Гость
1) 40994,01 в 10 = 1010000000100010.00000010100 в 2
2) 
4657,48 в 10 = 1001000110001.01111010111 в 2
3) 
562 в 8 = 101110010 в 2
4) 
5001 в 16 = 101000000000001 в 2
5) 
1011011 в 10 = 11110110110101000011 в 2 
Ответ
Ответ оставил: Гость
Program pr_1;
a:array [1..n] of real;
n, i:integer;
begin
readln(n)
for i := 1 to n do
begin
a[i] := readln()
if a[i] <0 then a[i] := a[i] - 5;
else a[i] := i;
end;
writeln(a);
end.
Ответ
Ответ оставил: Гость
Я не знаю ничего......


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 1 на вопрос по информатике: Подсчитать количество целых чисел среди чисел a,b,c.... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube