#include "math.h"
#include <stdlib.h>
#include "stdio.h"
#include "conio.h"
#include <iostream>
using namespace std;
int main()
{
using namespace std;
int N;
int count = 0;
setlocale(LC_ALL, "Russian");
cout << "Введите N : "; cin >> N;
for (int i = 0; i <= N; i++)
{
if (i % 5 == 0 && i!=0) count++;
}
cout << "Натуральных чисел,кратных 5-ти в данном ряду : "<< count;
cout << endl;
_getch();
}
1.35-16=19-не посещают кружки
2.19-17=2 -посещают биологию
3.9-7=2-посещают математику и биологию
ответ=2 ребят посещают математику и биологию
Var a:byte;
begin
write ('<span>x+y=a+b');
end.</span>
Program task;
var x,i,sum:integer;
begin
readln(x);
sum := 0;
for i := 1 to 4 do
begin
sum := x mod 10 + sum;
x := x div 10;
end;
writeln(sum);
readln;
<span>end. </span>