С++
#include<iostream>
using namespace std;
main()
{
int a, s;
cin >> a;
for(int i = 15; i <= a; i++)
s += i;
cout << s;
}
Python
a = int(input())
s = 0
for i in range(15, a + 1):
s += i
print(s)
Pascal
var a, s, i: integer;
begin
read(a);
for i := 15 to a do s += i;
write(s);
end.
#include <iostream>
using namespace std;
int main(){
int x{},k{};
cin >> x;
for(int i = 1; i <=x; i++){
if(a%i==0){
k++
}
}
cout << k;
return 0;
}
79. Изобразите на схеме элементы, образующие и наВ = {н, о, ч, к, а), с = {р, е, к, ај, D = {у, ч, е, н, и, к}. Запишите все эле
Андрей 2011 [102]
Ответ:
Объяснение:
1{н, о, ч, к, а, р, е}
2) {к, а}
3) {н, о, ч, к, а, р, е, у, и}
4) {к, а}
5) {н, ч, к, е}
6) {у, ч, е, н, и, к}
7) {н, о, ч, к, а, е}
8) {к, а, ч, н}
Вот рабочая программа:
var
x,a,b,c,proiz,sum:integer;
begin
WriteLn('Введите 3-ех значное число');read(x);
a:=x mod 10;
b:= (x div 10) mod 10;
c:=x div 100;
sum:=a+b+c;
proiz:=a*b*c;
WriteLn('Произведение разрядов=', proiz);
WriteLn('Сумма разрядов=', sum);
end.