Type student=record
familia:string;
nomer:byte;
yspevaemosti:array[1..5] of integer;
end;
#include <iostream>
using namespace std;
int main()
{
unsigned n;
cin >> n;
if (n > 0) {
for (int i = 2; i <= n; i += 2) {
cout << i << " ";
}
}
return 0;
}
<span>157(10) = 10011101(2)
со знаком, это представим в прмом коде
1,10011101
обратном
1,01100010
и дополнительном
1,01100011</span>
var a:array[1..10] of integer;
i: integer;
begin
for i:=1 to 10 do
begin
if i mod 2 = 0 then A[i] :=i * 2
else A[i] :=0;
write (a[i]:3)
end
end.
На паскале.
1)
var i, n, sum : integer;
begin
sum := 0;
for i := 1 to 10 do
begin
readln(n);
sum := sum + n * n;
end;
writeln(sum);
end.
2)
var i, sum : integer;
n : real;
begin
sum := 0;
for i := 1 to 15 do
begin
readln(n);
if n = trunc(n) then sum := sum + 1;
end;
writeln(sum);
end.
3) var n, m, i : integer;
begin
readln(n, m);
for i := n to m do
if i mod 2 = 0 then writeln(i);
end.
4) var n, i : integer;
begin
readln(n);
for i := 1 to n do
if n mod i = 0 then writeln(i);
end.