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

Pascal. работа с типами данных. условие 1: записать на паскале следующие числа (в дробной части указывать до 4 цифр): 6,28(5) -1/3 3*10^-7 1/10000 условие 2: записать следующие числа без десятичного порядка: -0.253е3 1e0 пример функции работы с типами данных: ord('a')=97; round(5.47)=5; trunc(5.47)=5; odd(51)=true; pred(50)=49; ord(1)=1; round(5.74)=6; trunc(5.74)=5; odd(24)=false; succ(50)=51.

👇
Ответ:
25marta52
25marta52
04.05.2020
1.
6.2856
-0.3333
0.0000
0.0001

2.
-253
1
4,5(17 оценок)
Открыть все ответы
Ответ:
funnybotan2000
funnybotan2000
04.05.2020
Решение:

const M = 10;
var a : array [1..M] of integer;
    i,max, odd : integer;
begin
    odd := 0;
    {Заполнение массива}
    for i := 1 to M do
    begin
        write('Input a[',i,']:' );
        readln(a[i]);
    end;
    {Вывод массива на экран}
    for i := 1 to M do
        write(a[i]:2,' ');
    writeln;
    {Поиск максимального в массиве}
    max := a[1];
    for i := 2 to M do
        if (a[i] > max) then
            max := a[i];
    writeln('Максимальный элемент массива: ',max);
    {Поиск всех нечетных чисел в массиве и замена их на 1}
    for i := 1 to M do
        if (a[i] mod 2 = 1) then
            begin
            a[i] := 1;
            odd := 666;
            end;
    {Вывод сообщения об отсутствии нечетных чисел}
    if (odd = 0) then
        writeln('В массиве нечетных чисел нет');
    {Вывод преобразованного массива}
    for i := 1 to M do
        write(a[i]:2,' ');
    writeln;
    readln;
end.

В фигурных скобках - комментарии, из программы можно удалять безболезненно. M - количество элементов в массиве.
Контрольные примеры для массива из 10 элементов:
1) Массив "1 2 3 4 5 6 7 8 9 10" будет преобразован в "1 2 1 4 1 6 1 8 1 10", максимальный элемент (до преобразования) 10
2) Массив " 2 2 2 2 2 2 2 2 2 2" будет преобразован в " 2 2 2 2 2 2 2 2 2 2", на экран будет выведено сообщение "в массиве нечетных чисел нет", максимальный элемент 2
4,8(36 оценок)
Ответ:
alikhan12
alikhan12
04.05.2020
А) двоичная - 1110010.00111001101
восьмеричная - 162.16320047244
шестнадцатеричная - 72.39A02752546
b) 316.8125
668.625
691.953125
c) 615.75 (10) + 269.625 (10) =1101110101.011 (2)
186.4375 (10) + 887.25 (10) =2061.54 (8)
101.125 (10) + 970.4375 (10) = 42F.9 (16)
d) 950.1875(10)-254.25(10)=1010110111.1111(2)
752.1875 (10) - 654.5 (10) = 141.54 (8)
51.375 (10) - 17.25 (10) = 22.2 (16)
e) 7.625(10)*5(10)=100110.001 (2)
84.375(10)*31(10)=5067.5(8)
420(10)*243(10)=18EAC(16)
6. Очевидно, что система позиционная.
Тогда 1 стоит на 2-ой позиции (начиная с нулевой) .
Тогда 49 = x^2
ответ - X = 7
4,7(55 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ