запах это точно ....................................................................................................................................................................................................

0 0

4 года назад

Информатика 1) 150 Кб- ?бит- ?Мб2)3 Мб - ? байт3) 5500 Мб - ? Гб - ?КбСрочно!!!! Даю 15 балов

Владимир2222

1)150000б. 0.15мб
2)3е+6 байт
3)5.5 гб. 5500000кб

0 0

4 года назад

Прочитать ещё 2 ответа

Помогите написать программу на PascalABCNETВХОДНЫЕ ДАННЫЕДана последовательность натуральных чисел, завершающаяся нулем. ВЫХОДНЫ

nata26pani [29]

Program kek;var r,q,z,s,n:integer;beginwrite ('введите непустую невозрастающуюю последовательность целых чисел, заканчивающуююся нулем');readln (n);z:=0;q:=1;while n<>0 dobeginif n=z then q:=q+1 else z:=n;readln (n); end;write ('кол-во одинаковых, идущих подряд чисел равно ', q);end.

0 0

1 год назад