Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
урок 8 задача 5 символьный тип данных
{Урок 8 задача 5.} var sign : char; var letter, digit : integer; begin digit := 0; // счётчик цифр letter := 0; // счётчик букв while sign <> '.' do begin read(sign); if sign in ['0'..'9'] then digit := digit + 1 else if sign in ['a'..'z', 'A'..'Z'] then letter := letter + 1; end; writeln (digit, ' ', letter); end.
run
|
edit
|
history
|
help
0
Fast program
Find Nash Equilibrium
Huong11a2@
practica 2 ejercicio 3
Kelipatan
1
nomer2
Huong11a2@
Gertie
imprimir_numeros_hasta_N