Составте программу на языке программирования паскаль:Подсчитать количество букв ''а'' в заданном тексте
5-9 класс
|
var n,i:integer;
Begin
read(n);
for i:= 2 to n-1 do
if n mod i = 0 then writeln('No');
End.
var n,i:integer;
s:string;
Begin
read(s);
for i:= 1 to length(s) do
if s[i]="a" then n:=n+1;
writeln(n);
End.
Скорее всего так
Другие вопросы из категории
следующим образом: 1,2,3,4,5,6,7,10,11
мудренное то не нужно мне за 5-ый класс заранее спасибо
Читайте также
текстового "псевдорисунка" или любой фразы (например, "Привет, МИР!").
if A>B then S: = A+B;
writeln (S);
Варианты ответов:1)5 ;2)6; 3)7; 4)8
2. Какое значение переменной S будет напечатано после выполнения фрагмента программы, записанной на языке программирования PASCAL:
S: =1;
N: =1;
while N<=3 do
begin
S: = S*N;
N: = N+1;
end;
writeln(S);
Варианты ответов: 1)2 ; 2)1; 3)0; 4)4
а)2,136+2/3y
б)(x-5)+a/3ax
Например:
Математическая запись: Запись на языке программирования:
a+3b-2c (a+3 умножить на b-2 умножить на c):(7 умножить на a+2)
Срочно!
B(4,3). Заменить отрицательные элементы произведением положительных элементов. Языка программирования - паскаль.
ЗАДАЧА - Составить программу решения задачи: Z = m/(m-1)
ЗАДАЧА - Составить программу определения четных (нечетных) чисел