Информатика: Создать бегущую строку по периметру в паскале

samira2314

18.11.2021 18:48

Информатика

Есть ответ 👍

Создать бегущую строку по периметру в паскале

263

357

Посмотреть ответы 2

Ответы на вопрос:

nataliyapotehi

Информатика

4,8(25 оценок)

Данный код на языке паскаль (pascal) выглядит так: uses crt; procedure runst(var s : string); begin s: =copy(s,2,length(s)-1)+s[1]; end; var st: string; begin hidecursor; st: =' test running string '; while length(st)< 80 do st: =' '+st; repeat gotoxy(1,13); write(st); sleep(100); runst(st); until keypressed end.