Question

Дан текст из строчных латинских букв и цифр ,определить чего больше в этом тексте букв или цифр.
Тема "множества" (Паскаль АВС)

Answer 1

// PascalABC.NET 3.0, сборка 1111
begin
  var s:=ReadLnString('Введите текст: ');
  var na:=s.Where(x->x in ['a'..'z']).Count;  // количество букв
  var nd:=s.Where(x->x in ['0'..'9']).Count;  // количество цифр
  if na>nd then Writeln('В тексте больше букв')
  else
    if na<nd then Writeln('В тексте больше цифр')
    else Writeln('В тексте букв и цифр поровну')
end.

Тестовое решение:
Введите текст: the equation 3.546x^2+4.18x-4.1=0
В тексте больше букв

Answer 2

я не собираюсь,устраивать с вами пертурбацию ,по поводу кто что не так корректно сформулировал.Написали бы ,что пишите только так и все или хотя бы просто спросили какая версия.

Answer 3

Вы меня хотите поучить Правилам, что, как и когда писать нужно? Т.е. перед тем как Вам давать ответ, надо еще Вашего согласия испросить на то, в какой форме, на какой версии языка и на каком уровне программирования его писать? Не слишком ли много Вы на себя берете?

Answer 4

Я имела ввиду ,что как умный и интеллегентный человек просто написали бы ,что вы пишите программы пишите на таком уровне и ничем помочь е можете,а не устраивали здесь дискуссию

Answer 5

Смешно, правда. Вот всех до Вас столько месяцев устраивало, а для Вас нужен "особый подход". Давайте заканчивать пререкания. Если я Вам говорю, что Ваше условие задания позволяет двать ответ на любом уровне программирования языка ПаскальABC, то это так и есть.

Answer 6

..