М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
mashauuu6
mashauuu6
25.03.2021 16:18 •  Информатика

Склавиатуры заданы длины основания трапеции a и высота b, а также стороны прямоугольника c и d. составьте программу которая определяет являются ли данные фигулы равновеликими

👇
Ответ:
данич36
данич36
25.03.2021
Var a,b,c,d:real;
begin
writeln('Введите a,b,c,d');
readln(a,b,c,d);
if(a*b=c*d) then writeln('равновелики')
else writeln('не равновелики');
readln;
end.
4,5(73 оценок)
Открыть все ответы
Ответ:
nosanchuk14
nosanchuk14
25.03.2021
1.                                                            

program raf105;

var  

 i,n,a: integer;

begin

 write('Введите число: ');

 readln(a);

 write('Введите количество повторений: ');

 readln(n);

 for i:=1 to n do

   writeln(a);

end.

2.                                                            

program raf105;

var  

 sum,i: integer;

begin

 for i:=10 to 99 do

   if i mod 2 = 0

     then sum:= sum+i;

 writeln('Сумма всех чётных двузначных чисел: ',sum);

end.

3.                                                            

program raf105;

var  

 x,y: real;

begin

x:= -2;

 while x <= 2 do

 begin

   y:= 2*x+3;

   writeln(x:4:1,' ',y:4:1);

   x:= x+0.2

 end;

end.

                                                              PascalABC 3.4.2
4,4(36 оценок)
Ответ:
Shkolnik555777
Shkolnik555777
25.03.2021

1.

1) 4*24*1000*16 ≈ 3*2^19 (бит/с)

2) 900 Мбайт=9*25*4*2^23 бит =9*25*2^25 бит

3) (9*25*2^25) / (3*2^19) = 3*25*2^6 (c) = 75*64 (c) =75*64/60 (мин)= 80(мин)                                

ответ  80 мин

2.

1)  640*480=(5*2^7)*(15*2^5)=5*15*2^12 пикселей

2) 240 Кбайт=15*2^4 *2^13 бит=15*2^17 бит

3) (15*2^17) / (5*15*2^13) = 2^4 / 5  бит =3,2 бит = 3 бит - 1 пиксель

4) 2^3=8 цветов                ответ 8 цветов

3.

1) 80 *0,7=56 Мбайт - cжатый файл

 80 Мбайт =5*2^4 *2^23 бит=5*2^27 бит

  56 Мбайт=7*2^26 бит

2)  5*2^27 / 2^22 = 5*2^5 (с) = 160 секунд - время несжатого файла

3)  7*2^26 / 2^22 =7*2^4 (c) = 112 (c)

4) 23(c)+12(c)+112(c)= 147 (c) - время сжатого файла

5) 160-147=13 (с)    ответ передача сжатого файла быстрее на 13 с

4,8(7 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ