• Составить программу нахождения количества букв "а" в тексте ( на языке Паскаль )

Ответы 2

  • var s:string; i, m:integer;begin readln(s); m:=0; for i:=1 to length(s) do if(s[i]='a') then m:=m+1; writeln(m);end.
  • Сделано (20 символов тоже тут)
    answer img
    • Автор:

      alan60
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years