Определить на какую букву заканчивается третье слово в предложении (Pascal ABC)
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Вольдемар
uses crt; var s:string; i,j:integer; begin Readln (s); While j<3 do begin i:=i+1; If (s[i] = (' ')) or (s[i] = (',')) then j:=j+1; end; Writeln (s[i-1]); end.
Новые вопросы в разделе Информатика
s3129502@gmail.com
16.02.2024, 13:53
Информатика
7-9 класс
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00
