Опубликовано 5 лет назад по предмету Информатика от HowiK

1.Вводится натуральное число. Найти сумму четных цифр, входящих в его состав.
2. Дан текст. Определить процентное отношение строчных и прописных букв к общему числу символов в нём.
ПРОГРАММА В ПАСКАЛЬ

Ответ

Ответ дан XletstraikcX

Объяснение:
1.
n - исходное число,
sum - сумма четных чисел.
var
n: longint;
sum: integer;
begin
readln(n);
sum := 0;
while n > 0 do begin
if n mod 10 mod 2 = 0 then
sum := sum + n mod 10;
n := n div 10;
end;
writeln(sum);
end.
2.
str - строка;
len - количество символов в строке;
let_s, let_b - количество строчных (маленьких) и прописных (больших) букв.
var
str: string;
i, len, let_b, let_s: byte;
begin
readln(str);
len := length(str);
let_b := 0;
let_s := 0;
for i:=1 to len do
if (str[i] >= 'a') and (str[i] <= 'z') then
let_s := let_s + 1
else
if (str[i] >= 'A') and (str[i] <= 'Z') then
let_b := let_b + 1;

writeln((let_s/len)*100:5:2);
writeln((let_b/len)*100:5:2);
writeln;
end.

Самые новые вопросы

Другие предметы - 4 года назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Другие предметы - 4 года назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

История - 4 года назад

Кто такой мильтиад и какова его роль в победе над персами?

История - 4 года назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

География - 4 года назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают