Var
i,n:integer;
Begin
for i:= 1 to 119 do
if (i mod 5) = 0 then
n:=n+i;
Write('Сумма положительных кратных 5 чисел, меньших 120 равна ',n);
<span>End.
И вопрос - вы действительно 1-4 класс?</span>
На паскале ABC
1) var
a,b,c,ot1,ot2:real;
begin
readln(a,b,c);
ot1:=a+b+c;
ot2:=a*b*c;
writeln(ot1,ot2);
end.
#include <stdio.h>
int main()
{
int a,b,c;
scanf("%d %d %d",&a, &b, &c);
if (a==b || a==c || b==c) printf("есть одинаковые");
else printf("нет одинаковых");
return 0;
}
Пример:
5 8 5
<span>есть одинаковые</span>
Значащие нули - нули не находящиеся на 1 позиции числа . Пусть n кол-во значащих нулей :
289 (10) = <span>100100001 (2) , тогда n = 6
309 (10) = </span><span>100110101 (2) , тогда n = 4
</span>154 (10) = <span>10011010 (2) , тогда n = 4
</span>763 (10) = <span>1011111011 (2) , тогда n = 2</span><span>
</span>