4 года назад

Дана длина ребра куба.найти объем куба и площадь его боковой поверхности. L=15

1 ответ:

MikeMLGSRS [2]4 года назад

0 0

Длина ребра =а
а= 15
площадь грани= а2 =225
площадь полной поверхности 6 а2 (шесть граней в кубе)
значит объём =а3 = 3375

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

Какое значение принимает переменная Х после выполнения операций присваивания: Х := 3 + 2; Х := 4; Х := 2 + Х* 2;

Евгения8765

<span>Х := 3 + 2; // Присвоено значение 3 + 2 = 5 (x = 5)
Х := 4; // Присвоено значение 4 (x = 4)
Х := 2 + Х* 2;</span> // Присвоено значение 2 + 4*2 = 10 (x = 10)

0 0

3 года назад

1) Какой объём видеопамяти в килобайтах нужен для хранения изображения размером 600 х 350 пикселей , использующего 8 - цветную п

osa2

1) На 1 пиксель при 8-цветной палитре требуется log(2)8=3 бита
На все изображение 600*350*3 бит = 600*350*3/(8*1024) Кбайт ≈ 77 Кбайт
2) На 1 пиксель: log(2) 16=4 бита
На 1 страницу: 640*400*4 бит = 640*400*4/(8*1024) Кбайт = 125 Кбайт
Количество страниц = 1250/125 = 10
3) 65*1024*8/(350*200)≈8 бит
Количество цветов = 2^8 = 512

0 0

4 года назад

1) Все имена существительныеизменяются по падежам и числам. Слово "урок" - имя существительное. Следоватьльно, ...2) Если число

Алина Владимировна

1) именительного падежа,единственного числа.
2)<span>следовательно, число не оканчивается на 0</span>

0 0

3 года назад

С клавиатуры вводят целое число.Если оно положительное-увеличить его пять раз на два,иначе вывести сообщения,что число не положи

ВАСЯ1800 [7]

Программа на Pascal
---------------------------------

Program Test;

Var num, i: integer;

Begin

Write('Введите число: ');
Readln(num);

if (num > 0) then
begin
for i := 1 to 5 do
num := num + 2;

Writeln();
Writeln('Число после увеличения: ', num);
end

else
begin
Writeln();
Writeln('Число не положительно');
end;

End.

0 0

4 года назад

Программирования помагите пожалуйста 20 баллов

elevask [31]

var a,b:integer;

begin

writeln('введите стороны прямоугольника:');

write('первая сторона равна:');readln(a);

write('вторая сторона равна:');readln(b);

write('площадь прямоугольника со сторонами ',a,' и ',b,' равна ',a*b);

end.

Var x: integer;

Begin

write('введите число х=');

readln(x);

If x>=2 Then write('y=',sqrt(x))

Else write('y=',x);

End.

0 0

4 года назад