java
import java.util.random;
public class myapp{
public static void main (string {
random rand = new random();
int n = rand.nextint(50);
int [] arr = new int[n];
for(int i = 0; i < n; i++) {
int j = rand.nextint(50);
arr[i] = j;
}
for( int i = 0; i < n; i++) {
if ( arr[i] % 2 == 0 ) {
system.out.print(arr[i] + " ");
}
}
}
}
pascal
program myapp;
var
i, n , j: integer;
arr: array of integer;
begin
randomize;
n : = random(50);
setlength(arr, n);
for i: = 0 to n do
begin
j: = random(50);
arr[i]: = j;
end;
for i: = 0 to n do
begin
if( arr[i] mod 2 = 0 ) then
begin
write(arr[i], ' ');
end;
end;
end.
1)
var a,b:longint;
begin
readln(a,b);
writeln(a+b);
end.
2)
var x:longint;
begin
readln(x);
if(x>0) then writeln(x-6) else if(x=0) then writeln(32*x-7) else if(x<0) then writeln(5*x-2);
end.
3) В третьей условие не совсем понял, если что, дополни, отредактирую код. Какие значения принимают элементы (по какому принципу заполняется массив)? Написал для массива с элементами от 1 до 50.
var a:array[1..50] of integer;
var i:integer;
begin
for i:=1 to 50 do a[i]:=i;
for i:=1 to 50 do writeln(a[i]);
end.
I = 800, К = 100; N = ?
N = 2i, I = К • i, i = I / К
i = 800/100 = 8 (бита)
N = 2^8= 256(символов)
ответ: 256 символов.