Нужно умножить стороны треугольника
Ответ:
435+205= 640
1)110110011 снизу 2+11001101 снизу 2=10100000002 снизу 2
2) 403-55= 348
10010011 снизу 2-110111 снизу 2=101011100 снизу 2;
3)77*5=385
1001101 снизу 2*101 снизу2 =110000001 снизу 2
Объяснение:
Const n=4; { любое число N от 1 до 100000}
var a:array [1..n] of integer;
b,min,max, s:integer;
proizvedenie:real;
beginwriteln('Введите n чисел');
for b:=1 to n do read (a[b]);
for b:=1 to n do
write(a[b],' ');
min:=a[1];
max:=0;
for b:=1 to n do
begin
if a[b]>max then max:=a[b];
if a[b]<min then min:=a[b];
end;
proizvedenie:=max-min;
writeln;
writeln('minimum ',min,' ','maximum ',max,' Proizvedenie= ',proizvedenie); readln;
<span>end.</span>
Под управлением процессора информация о цвете каждого пикселя экрана компьютера заносится для хранения в видеопамять. Видеопамять— это электронное энергозависимое запоминающее устройство. Глубина цвета, а значит, количество цветов в палитре компьютера, зависит от размера видеопамяти. Видеопамять современных компьютеров составляет 256, 512 и более мегабайтов.
Если убрать лишние точки с запятой то получится так
var
x, y: integer;
begin
readln(y);
x := 0;
if x > 0 then
writeln(x, y);
readln;
end.
Верна ли? А что есть критерием верности? Компилируется, не падает при исполнении, но по сути совершенно безсмысленна и потому наверно неверна)))
Операторов два - присвоения и сравнения