Кто хоть Немного разбираеться в Паскале Помогите плиз :(((((
|
|
1.Используя идею обращения числовой матрицы написать программу для обращения булевой матрицы. 2.Предложение состоит из слов, между словами один пробел, а после последнего слова точка. Найти самое короткое слово, начинающееся на букву «А». Помогите плиз ктото :((((
Студент :)
|
|
|
Quote (onlyrevo) 1.Используя идею обращения числовой матрицы написать программу для обращения булевой матрицы. Не понял задания, по возможности - пример ввода-вывода
Quote (onlyrevo) 2.Предложение состоит из слов, между словами один пробел, а после последнего слова точка. Найти самое короткое слово, начинающееся на букву «А». Помогите плиз ктото :(((( var a,stroka:string; i,k,dlinna:integer; begin dlinna:=high(dlinna);k:=0; readln(stroka); delete(stroka,pos('.',stroka)+1,255); for i:=1 to length(stroka) do if (stroka[i]=' ')and(stroka[i+1]=' ') then delete(stroka,i,1); if pos('a',stroka<>0 then while pos('a',stroka)<>0 do begin a:=copy(stroka,1,pos(' ',stroka)); delete(stroka,1,pos(' ',stroka)); k:=length(a); if k<dlinna then dlinna:=k;end else writeln('Tut net bukvu A'); end.
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
спасибо большое !!!!!!
Студент :)
|
|
|
"Спасибо" принимается в виде повышения репутации ( Зелёный плюсик:) ).
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
2 задание почемуто не работает ... :((((((
Студент :)
|
|
|
Ошибку пишет?
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
не соответствуют данные :((((
Студент :)
|
|
|
на какой строчке?
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
if pos('a',stroka<>0 then вот здесь почемуто пишет ошибку ... :(
Студент :)
|
|
|
ахахахха)))))))) люди, вы хоть что-нибудь понимаете в паскале?)) после ноля скобку закрой)
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|