Для заданной последовательности A проверить, встречается ли среди ее первых 10…

Question

42

Для заданной последовательности A проверить, встречается ли среди ее первых 10 символов буква s, а для последовательности В проверить, встречается ли средиее первых 20 символов буква q

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

umbertone · Accepted Answer

70

umbertone

23 марта 2023

Var a,b: string; i: integer; ka,kb: boolean; begin readln (a); readln (b); for i: =1 to 10 do if a[i]='s' then ka: =true; if ka then writeln ('s in A'); for i: =1 to 20 do if b[i]='q' then kb: =true; if kb then writeln ('q in B') end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: