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

Составить программу в pascal, распечатывающую на экране компьютера сумму результатов умножения на число 4 первых 9 натуральных чисел.

👇
Ответ:
F777FF
F777FF
08.03.2020
Program gg;
var  count: integer;
begin  count := 1 * 4 + 2 * 4 + 3 * 4 + 4 * 4 + 4 * 5 + 4 * 6 + 4 * 7 + 4 * 8 + 4 * 9;  writeln(count);end.
4,6(48 оценок)
Открыть все ответы
Ответ:
Kismos2006
Kismos2006
08.03.2020
1)
площадь изображения 35.56×35.56 = 1264.51 квадратных дюймов.
количество точек в квадратном дюйме 1200×1200 = 1 440 000 точек
количество точек во всем изображении
1 440 000 * 1264.51 = 182 089 440 000
глубина цвета 16 бит. 3 цвета RGB * 16 = 48бит на точку
Итого 182089440000 * 48 = 8740293120000 бит
8740293120000 / 8 бит в байте / 1024 байт в КБ /1024 кб в мб / 1024 мб в гб = 865,39 Гигабайт

2)
для палитры в 4 цвета небоходимо 2^n=4, n=2бита
55*55 = 3025 пикселя * 2 бита на пиксель = 6050бит

3)
изображение 12,7×12,7 см.
Разрешающая сканера — 600×1200 dpi,
глубина цвета — 32 бита.
в 1дюйме 2,54 см,  12,7см/2,54 см = 5 дюйм
Изображение 5 * 5 = 25 квадратных дюймов
600*1200 = 720 000 точек на квадратный дюйм
720 000 * 25 = 18 000 000 точек на изображение

глубина цвета 32 бит. 3 цвета RGB * 32 = 96 бит на точку
Итого 18 000 000 * 96 = 1 728 000 000 бит / 8 бит в байте =
216 000 000 байт
4,6(79 оценок)
Ответ:
алина3821
алина3821
08.03.2020

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.

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