Дан текст из строчных латинских букв и цифр ,определить чего больше в этом тексте букв или цифр. программа на языке паскаль авс(извините версию не знаю)

164

421

Посмотреть ответы 2

Ответы на вопрос:

nazipovadk

Информатика

4,4(7 оценок)

// pascalabc.net 3.0, сборка 1111 const alpha=['a'..'z']; digits=['0'..'9']; var na,nd,i: integer; s: string; begin na: =0; nd: =0; write('введите текст: '); readln(s); for i: =1 to length(s) do if s[i] in alpha then inc(na) else if s[i] in digits then inc(nd); if na> nd then writeln('в тексте больше букв') else if na< nd then writeln('в тексте больше цифр') else writeln('в тексте букв и цифр поровну') end. тестовое решение: введите текст: the equation 3.546x^2+4.18x-4.1=0 в тексте больше букв

feo073007feo

Информатика

4,7(34 оценок)

#include < iostream> #include < vector> using namespace std; int main() { int b, d; d = 1; vector < int> a(15); for (b = 0; b < 15; b++) { cin > > a[b]; } for (b = 0; b < 15; b++) { if (a[b] % 2 == 0) { d = a[b] * d; } } cout < < d; system("pause"); return 0; }