Дано натуральное число n. определить, является ли - вопрос №129814 от sasha230200487 07.05.2023 00:40

Question

Информатика: Дано натуральное число n. определить, является ли оно простым . составить программу на языке программирования паскаль: подсчитать колтчество букв а в заданном тексте. надо .

sasha230200487 · Answer

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.