Заданный текст содержит только цифры и буквы. определить обладает ли он следующим свойством текст содержит ровно две цифры. написать программу в delphi
223
487
Ответы на вопрос:
Program pt; {$apptype console} var s: string; i,k: integer; begin write('text: '); readln(s); for i: = 1 to length(s) do if ('0'< =s[i])and(s[i]< ='9') then k: =k+1; writeln(k=2); readln end.
Популярно: Информатика
-
saskii28.05.2020 16:04
-
madinagame544430.09.2022 02:22
-
даша364612.07.2022 13:11
-
hbgggb18.01.2020 00:23
-
wasdas390wasdas39024.09.2020 23:58
-
vikyyyyysya14227.01.2020 18:45
-
fdffxdf24.11.2021 14:35
-
timabro1212.10.2022 04:44
-
14672730.09.2022 16:41
-
panaitov02320.04.2021 18:10