alfaantonk
?>

Написать программу на паскале: "если введенное целое число является трехзначным, то удалить из него среднюю цифру; если число двухзначное, то удвоить крайние цифры; иначе – выдать сообщение «ошибка ввода»."

Информатика

Ответы

ERodina1

program z1; uses crt; var n: integer; beginwriteln(''вв число'); readln(n); if n> 999 then writeln('ошибка ввода') elseif n> 100 then writeln((n div 100)*10+n mod 10 ) else div 10)*2)*10)+((n mod 10)*2)); end.

сергей1246
(x1+x2+x3+x4+x5+x6+x7+x8)/8=5     (выражение 1) через x обозначили значения, стоящие в ячейках от a3 до d4. x7+x8=4       (выражение 2) , где x7 и x8 это значения, стоящие в ячейках d3 и d4 соответственно. подставляя выражение 2 в выражение 1 получаем: (x1+x2+x3+x4+x5+x6+4)/8=5     (выражение 3) теперь, умножаем выражение 3 на "8". x1+x2+x3+x4+x5+x6+4=40   (выражение 4) далее, переносим "4" вправо: x1+x2+x3+x4+x5+x6=36     (выражение 5) далее, 36 делим на количество слагаемых "6" и получаем ответ "6". ваш ответ: 4) 6
katrin50

6445 Кбайт

Объяснение:

V = t * f * i * k , где  

V - информационный объём аудио файла (размер файла, содержащего запись звука)

t - общая длительность звучания (секунды)

f - частота дискретизации (Гц, количество значений амплитуды звука, фиксируемых за одну секунду)

i - глубина звука (разрешение, разрядность) (число бит, используемых для хранения каждого измеренного значения)

k -  количество каналов записи (1 - моно, 2 - стерео и т.д.)

Дано:

t = 5 мин = 5 * 60 = 300 секунд

f = 22000 (единицы не указаны, будем считать что Гц)

i = 8 бит

k не указано (будем считать 1 моно)

Найти:

V

V = t * f * i * k

V = 300 * 22000 * 8 * 1 = 52 800 000 бит

V = 52 800 000 бит = 52 800 000 / 8 = 6 600 000 байт = 6 600 000 / 1024 = 6 445,3125 Кбайт ≈ 6445 Кбайт

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать программу на паскале: "если введенное целое число является трехзначным, то удалить из него среднюю цифру; если число двухзначное, то удвоить крайние цифры; иначе – выдать сообщение «ошибка ввода»."
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kiparistop
Olesya-elena1525
ea-office
shumeikoElena362
praskovya17
Sergei_sergei
Valerevna-Vardan
Araevich
Герасимова107
mar1030
magazintrofey
Анатольевич-Фатима
tanyatanyat
beaevgen711
Шаленко