USES Crt; VAR A : STRING [255]; I: INTEGER; BEGIN ClrScr; WriteLn('Введите текст'); ReadLn(A); I:=4; While (I<=Length(A)) DO Begin IF A[I]='мама' THEN Begin Insert ('и папа ',A,I); I:=I+1; End; I:=I+6; End; WriteLn('Измененный текст:'); WriteLn(A); END.
Спасибо
Ответ дал: Гость
первый файл займет 2750/1054 =2,6 = 3 кластера(может быть только целое число кластеров).
второй файл займет 324000/1024 = 307,4 = 308 кластеров.
ответ: 3 + 308 кластеров
Ответ дал: Гость
сначала нужно переправить козу, затем вернуться за капустой, переправить капусту и забрать козу. потом переправить волка, ну а потом уже козу.
Популярные вопросы