3 года назад

Переведите 301,4 в 8СС

Знания

Информатика

1 ответ:

Андрей Б [49]3 года назад

0 0

Решение с объяснением на фото

Читайте также

Помогите плиз Напишите программы для решения задач.Используйте опирации div и mod. 1.Задано двузначное число.Найдите среднее ар

Honda34

Какой язык програмирования?

0 0

4 года назад

Видеопамять имеет объем, в котором может храниться 4-х цветное изображение размером 600х400. Какого размера изображение можно х

Antip4ic [7]

$V=600*400*2\\2^2=4\\V=480000\\16=2^4\\V=S^{'} *4\\S^'=120000\\$
Ответ; 320x320; 240x320; 480x240

 P.S. Надеюсь на благодарность и лучший ответ.

0 0

4 года назад

Помогите решить задачу на Паскале. Выпуклый многоугольник на плоскости задан своими вершинами, расположенными в произвольном пор

LinkaHertz [2]

//Прошу прощения за "пузырёк"
//Pascal ABC.NET 3.1 сборка 1219

Const n=5; //количество вершин

Type
ty=record
x:integer;
y:integer;
end;

Var
ar:array[1..n] of ty;
i,j:integer;
begin
for i:=1 to n do
begin
write('Абсцисса точки №',i,':');readln(ar[i].x);
write('Ордината точки №',i,':');readln(ar[i].y);
end;
for i:=1 to n-1 do
for j:=i+1 to n do
if ar[i].x>ar[j].x then swap(ar[i],ar[j]);
for i:=1 to (n div 2)-1 do
for j:=i+1 to n div 2 do
if ar[i].y<ar[j].y then swap(ar[i],ar[j]);
for i:=n div 2+1 to n-1 do
for j:=i+1 to n do
if ar[i].y>ar[j].y then swap(ar[i],ar[j]);
ar.reverse.Print;
end.

Пример ввода:
Абсцисса точки №1:1
Ордината точки №1:2
Абсцисса точки №2:2
Ордината точки №2:1
Абсцисса точки №3:-3
Ордината точки №3:-3
Абсцисса точки №4:3
Ордината точки №4:3
Абсцисса точки №5:3
Ордината точки №5:1
Пример вывода:
(3,3) (3,1) (2,1) (-3,-3) (1,2)

0 0

1 год назад

Даны три стороны одного треугольника и три стороны другого треугольника.определить,будут ли эти треугольники равновеликими

Boa77 [57]

Да будут, по скольку даны стороны. вроде бы так

0 0

3 года назад

В игре русское лото из мешка случайным образом выбираются бочонки, на каждом из которых написано число от 1 до 90.Напишите прогр

Анастасия1293

const

n = 5;

var

i, j, k: integer;

a: array[1..n] of integer;

p: boolean;

begin

randomize;

for i := 1 to n do

repeat

k := random(90) + 1;

j := 1;

p := True;

while p and (j < i) do

if a[j] = k then

p := False

else

j := j + 1;

if p then

a[i] := k;

until p = True;

for i := 1 to n do

write(a[i], ' ');

end.

0 0

4 года назад