Ввести с клавиатуры строку символов.Вывести отдельной строкой строчные латинские буквы и...

0 голосов
207 просмотров

Ввести с клавиатуры строку символов.Вывести отдельной строкой строчные латинские буквы и подсчитать их количество.


Информатика (12 баллов) | 207 просмотров
0

Какой язык программирования нужно использовать?

0

PascalAbc

Дан 1 ответ
0 голосов

Program z1;
var a: string; b, c, i: integer;
begin
readln (a); writeln ();
c:= 0;
b:= lenght (a);
for i:=1 to b do
if (a[i] >= 'a') and (a[i] <</span>= 'z') then begin
write (a[i]); c := c 1; end;
writeln (c);
end.

Надеюсь, этот вариант сработает.

(405 баллов)
0

Строка произвольная,она может состоять как и из прописных,так и строчных букв,например,если я введу строку 'InFormAtika',программа должна отдельной строкой вывести 'normtika' и кол-во строчных букв,равное 8.

0

Хорошо. Я перепишу программу.

0

ругается на неожиданный символ ' ' в седьмой строке.

0

Попробуй заменить на " ", может помочь.

0

у меня есть теория,что у меня с паскалем проблемы,т.к. он ругается на ту строку,где этих кавычек нет.Ты можешь проверить программу у себя?

0

С кавычками всё в порядке, мой компилятор не ругается. Но я неправильно написала length (это уже правильный вариант), поэтому твой компилятор ругается. Исправь и всё сработает.

0

неправильно написание длины строки я сразу заметил и исправил,все таки дело в паскале,который ругается на кавычки.

0

Наверно, попробуй проверить на онлайн компиляторе.

0

Спасибо за помощь,программа заработала)

0

Не за что!)