Sosovna Dmitrievich22
?>

Вкажіть вірні оголошення змінних X:=12; Var X:=12; Var X: real; Var Real: x; Var A: string Var B: Boolian; Var Log. bulean , Vari: boolean Vart text Vart text Var Logik boolean Naziz integer

Информатика

Ответы

grekova5
1. есть число n.  пускай n=123. что будет, если разделить его на 10? получится 12,3. то есть 12 - целая часть, а 3 - остаток. далее снова делим на 10. 1,23. и в последний раз: 0,123. целая часть =0. на этом останавливаемся. а сколько раз выполнили деление? 3. вот и ответ. теперь запишем на паскале: как видно из вышенаписанного, нужно продолжать выполнять действия, пока целая часть не равна 0. то есть while n> 0 do и у нас есть некоторый счетчик итераций, значение которого и будет являться ответом. а тело цикла: n div 10 (целочисленное деление) inc(k) (увеличение счетчика) вторая: как я понял, нужно просто вывести на экран то, что должно получиться? нужно в цикле пройти по каждому символу. если он равен "*" (if s[i] = '*' then), ничего не делать. иначе вывести его два раза (write(s[i], добавить данные в начало файла нельзя. нужно либо записывать в новый, либо перезаписывать исходный (предварительно считав все в память)

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

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

Вкажіть вірні оголошення змінних X:=12; Var X:=12; Var X: real; Var Real: x; Var A: string Var B: Boolian; Var Log. bulean , Vari: boolean Vart text Vart text Var Logik boolean Naziz integer
Ваше имя (никнейм)*
Email*
Комментарий*

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

saltikovaK.S.1482
Кузнецов
MaratФам
Eduard Melikyan
vipppp19743355
Мельникова
annayarikova
buleckovd8724
badalovao256
Исаченко Тераски1181
Наталья_Васищев
andreyduborezz2913
emaykova785
reinish23
alina-bas