Pascal abc дана непустая последовательность слов - вопрос №10271977 от lenapelevina0 19.07.2020 19:02

Question

Информатика: Pascal abc дана непустая последовательность слов из строчных букв; между соседними словами - запятая, за последним словом - точка. напечатать в алфавитном порядке:  все гласные буквы, которые входят в каждое слово; все согласные буквы, которые не входят ни в одно слово;  все звонкие согласные буквы, которые входят хотя бы в одно слово; все глухие согласные буквы, которые не входят хотя бы в одно слово;  все согласные буквы, которые входят только в одно слово; все глухие согласные буквы, которые

lenapelevina0 · Answer

Обычно решают на Pascal, но я напишу на C++, он мне роднее)). Я конечно немножко по-другому реализовал (в плане ввода значений), но поставленную задачу выполняет.
1)
#include <stdio.h>
#inlcude <conio.h>
#include <iostream>
using namespace std;
int main()
{
long a, b, i, sum=0;
cin>>a; // Вводишь число a
cin>>b; // Вводишь число b
for (i=a;i<=b;i++)
{
sum=sum+(i*i);
}
cout<<sum; // выводим сумму квадратов чисел
_getch();
}

2)
#include <stdio.h>
#inlcude <conio.h>
#include <iostream>
using namespace std;
int main()
{
long a,b,c,d,i;
bool z=false;
cin>>a;
cin>>b;
cin>>c;
cin>>d;
for (i=10000; i<=99999; i++)
{
if (i % a==b && i % c==d) {z=true; cout<<i<<" ";}
}
if (z==false) {cout<<"-1";} // Выводится если нет чисел
_getch();
}