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

Составьте программу для вычисления суммы цифр введенного с клавиатуры трехзначного натурального числа.

👇
Ответ:
yanamalykh
yanamalykh
29.05.2023
Program z1;
  var
    a: integer;
    c: byte;
  begin
    readln(a);
    c:=0;
    while a <> 0 do  begin
      c:=c + a mod 10;
      a:=a div 10;
    end;
    writeln('Summa: ', c);
  end.
4,6(100 оценок)
Открыть все ответы
Ответ:
Аноним9111
Аноним9111
29.05.2023
Program Project1;

var m:array [0..14] of integer; i:integer;

function IsPositive(a:integer):boolean;
begin
  result:=(a>-1);
end;

procedure work;
var min, max, count:integer;
begin
  count:=0;
  min:=m[0];
  max:=0;
  for i:=0 to 14 do begin
    if IsPositive(m[i]) then begin
      inc(count);
      if m[i]>max then max:=m[i];
      if m[i]<min then min:=m[i];
    end;
  end;
  writeln('MAX: ', max);
  writeln('MIN: ', min);
  writeln('Count: ', count);
end;

begin
  for i:=0 to 14 do begin
    write('n: ');
    readln(m[i]);
  end;

  work;

  readln;
end.
4,8(74 оценок)
Ответ:
ларисаяна
ларисаяна
29.05.2023

ответ: 98,88 мегабайт.

Объяснение:

1) Переведем размер изображения из сантиметров в дюймы. Исходя из того, что 1 дюйм = 2,54 см., получаем: 30.48 см = 30.48 / 2.54 = 12 дюймов.

2) Размер изображения в дюймах равен:  12  * 12  = 144 дюйма.

3) Информационный объем графического файла определяется по формуле: l = K * i, где к - общее количество точек изображения, i - глубина цвета.

К = 600 * 1200 * 144 = 103680000 (умножили разрешение сканера на размер изображения).

l = 103680000 * 8 бит = 829440000 бит.

Переведем в мегабайты: 829440000 бит = 829440000 / 8 = 103680000 байт.

                                     103680000 байт = 103680000 / 1024 = 101250 килобайт.

                                     101250 килобайт = 101250 / 1024 = 98,88 мегабайт.

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