Pascal 1. В строке, любое количество подряд следующих пробелов замените единственным...

0 голосов
50 просмотров

Pascal
1. В строке, любое количество подряд следующих пробелов замените единственным пробелом.

2/Вычислите длину самого короткого слова в предложении из трех слов, разделенных пробелами.

Информатика (31 баллов) | 50 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
uses crt;var s:string;beginclrscr;writeln('Введите строку, содержащую группы пробелов:');readln(s);while pos('  ',s)>0 dodelete(s,pos('  ',s),1);write(s);readlnend.
(356 баллов)
0

Сорян

оставил комментарий (356 баллов)
0

Не получилось в виде таблицы

оставил комментарий (356 баллов)
Похожие задачи