Question

Дано предложение. Определить долю в процентах букв а в нем(pascal abc)

Answer 1

Ну? как то так

1) на pascal ABC
var i:integer;
n:real;
a:string;
begin
readln(a);
for i:=1 to length(a) do
if a[i]='a' then n+=1;
n:=(n/length(a)*100);
writeln(n:2:1);
end.

2) на pascal ABC
var i,n:integer;
a:string;
begin
readln(a);
for i:=1 to length(a) do
if (a[i]='p') and (a[i+1]='o') then n+=1;
writeln(n);
end.

Answer 2

Для определения доли букв "а" в предложении на языке Pascal ABC необходимо проанализировать каждую букву в предложении и подсчитать количество букв "а". Затем можно использовать следующую формулу для вычисления доли в процентах:

доля_в_процентах = (количество_букв_а / общее_количество_букв) * 100

Где:

• количество_букв_а - количество букв "а" в предложении;
• общее_количество_букв - общее количество букв (символов) в предложении.

Применяя эту формулу, вы сможете вычислить долю букв "а" в предложении на языке Pascal ABC в процентах.