ИринаАлександровна
?>

Нужна программа на pascal современные компьютеры могут выполнять арифметические действия с достаточно большими целыми числами (максимальное число целого типа 18446744073709551615), а всего 20 лет назад диапазон был ограничен 65536, что меньше в несколько сотен триллионов раз (10 в 14 степени раз но как быть, если нужно выполнить арифметические операции над числами, разрядность которых больше 20 (т.е. число будет больше, чем 18446744073709551615)? один из способов, это представить число в виде массива, элементы которого цифры данного числа. напишите программу для поиска максимального из трех чисел, состоящих из 20 разрядов. входные данные: три числа, перечисленные через пробел. разрядность каждого не более 25. числа не равны. выходные данные: наибольшее из трех заданных чисел. пример: входные данные: 1234 12345678901234567890 123123123123123 выходные данные: 12345678901234567890 входные данные: 32345678901234567890 12345678901234561111 12345678901234567890 выходные данные: 32345678901234567890

Информатика

Ответы

Дубровская571
Решение, использующее указанный способ, находится во вложенном файле. хочу : программа была написана в среде pascalabc.net, и в каких-то других средах массивы могут вести себя не совсем правильно, т.е. выдавать ошибку. в этом случае попробуйте изменить строку с объявлением n на "n: array[1..3] of array[0..24] of byte; ", убрать строку "setlength(n[i],len[i]); " и все выражения  вида n[a][b] заменить на n[a,b].
adminkuncevo

var a: array[1..5] of real;

    i, n_neg, n_pos: integer;

 

begin

    n_neg : = 0;

    n_pos : = 0;

    for i : = 1 to 5 do

      readln(a[i]);

    for i : = 1 to 5 do

      if (a[i] < 0) then

          inc(n_neg)

      else if (a[i] > 0) then

          inc(n_pos);

    writeln('positives: ', n_pos, ', negatives: ', n_neg)

end.

Galkin683

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

2) тактовая частота - влияет, если будет маленькая, то экран будет мерцать и портить глаза. хотя с точки зрения статического изображения не влияет

3) потребляемая мощь - не влияет на прямую

4) разрядность - другое название - глубина цвета. влияет, так как отвечает за кол-во возможных цветов

5) вес - не влияет на прямую

6) быстродействие - влияет на скорость отклика и скорость изменения изображений, но на качество статических изображений не влияет.

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

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

Нужна программа на pascal современные компьютеры могут выполнять арифметические действия с достаточно большими целыми числами (максимальное число целого типа 18446744073709551615), а всего 20 лет назад диапазон был ограничен 65536, что меньше в несколько сотен триллионов раз (10 в 14 степени раз но как быть, если нужно выполнить арифметические операции над числами, разрядность которых больше 20 (т.е. число будет больше, чем 18446744073709551615)? один из способов, это представить число в виде массива, элементы которого цифры данного числа. напишите программу для поиска максимального из трех чисел, состоящих из 20 разрядов. входные данные: три числа, перечисленные через пробел. разрядность каждого не более 25. числа не равны. выходные данные: наибольшее из трех заданных чисел. пример: входные данные: 1234 12345678901234567890 123123123123123 выходные данные: 12345678901234567890 входные данные: 32345678901234567890 12345678901234561111 12345678901234567890 выходные данные: 32345678901234567890
Ваше имя (никнейм)*
Email*
Комментарий*

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

eutenkova805
larinafashion829
Evsevia-a
MAXIM76748
хаджимурод1172
ielienakozlova696
Вячеславович-Дмитрий1694
borisrogovpr3407
Татьяна Марина1287
GridnevaVNIGNI&quot;
Seropyan-Elena1944
missmorozova2
bronco-s
zmlavra
sayfullinmr
▲