Помогите составить программу.Все большие буквы заменить на маленькие и посчитать количество точек и запятых.
10-11 класс
|
Вот файлик открой с помощью блокнота, ну там для англ букв, если для русских надо в for поменяй A Z на А Я
var
s: string;
i, coma: integer;
begin
read(s);
s := LowerCase(s);
for i := 1 to length(s) do
if (s[i] = '.') or (s[i] = ',') then coma := coma + 1;
writeln(s);
writeln(coma);
end.
А строка состоит из англ букв или русских?
Другие вопросы из категории
2) 1001100,100111 в десятичную ,восьмиричную , шестнадцатиричн
а) как дела?
б) когда увидимся
в) что делаешь?
г) ты где?
а) изъять. б)выделить в)переместить г)скопировать
Читайте также
ракета запускается с земли со скоростью V(км час) в направлении движения земли по орбите вокруг солнца. составить программу,определяющую результат запуска ракета в зависимости от скорости V.
Известно,что при V16,4 ракета покинет солнечную систему.
элементов настоящей таблице х [1 .. 10] на 0.
3.составить программу, замены отрицательного элементов настоящей таблице х [1 .. 10] на их квадрат.
4.составить прогрумму, которая увеличивает на 2 все элементы настоящей таблице х [1 .. 10], которые больше 10.
буквы "о" на буквы "и", а буквы "и"- на буквы "о".
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"