Составить программу на языке програмирования паскаль: Подсчитать…

Question

Составить программу на языке програмирования паскаль: Подсчитать количество букв «а» в заданном тексте. Заранееблагодарю.

Answer 1

87

bolo111

05 апреля 2023

uses crt; var x: string[200]; i,k: integer; beginclrscr; readln (x); k: =0; for i: =1 to length (x) doif copy (x,i,1)='f' then k: =k+1; writeln ('Chislo bukv f=',k); readln; end. Считает количество букв "f" в заданном тексте

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: