Категория
Информатика, опубликовано 08.02.2019 08:40

Напишите самый простой вариант, без массивов с цикла! (первый год изучения паскаля) напишите программу, которая в последовательности целых чисел определяет разность максимального и минимального чисел. программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность) . количество чисел не превышает 1000. введённые числа по модулю не превышают 30 000. программа должна вывести одно число: разность максимального и минимального чисел.

Ответы

Ответ
Ответ оставил: Гость

program juliavanina; uses crt; var  r,min,max: real;   k: integer; begin  writeln('*** alphaues is ***');   writeln('***                  ok                        ***');   min: =0;   max: =0;   k: =0;   r: =1;   writeln('введите ненулевое число, не превышающее 30000 по модулю');   writeln('(или введите 0 для конца последовательности) ');   while (r< > 0) and (k< 1000) do      begin          write('ввод: ');             readln (r);           if abs(r)< 30000 then                  begin                      if min> r then min: =r;                       if max< r then max: =r;                       k: =k+1;                     end              else                  begin                      writeln ('вы ввели слишком большое по модулю число');                       writeln ('это число не будет учтено');                   end;       end;   writeln();   writeln('всего введено ',k-1,' чисел');   writeln('разность min и max составляет ',max-min); end.

 

проверено - работает на паскаль авс

Ответ
Ответ оставил: Гость
На С#  я бы те написал но на LOGO хер знает
Ответ
Ответ оставил: Гость
8 бит = 1 байт, 16 бит = 2 байта
x - длина сообщения
2*x-1*x=2048 (байт)
x=2048 
Первоначальный объем
1*2048=2048 (байт) = 2048/1024 (Кбайт) = 2 Кбайта
Ответ
Ответ оставил: Гость
V=1024*56*64*16=58720256 бит
58720256 бит /8=7340032 байт / 1024=7168 Кбайт=7 Мбайт.
Ответ: 4


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 2 на вопрос по информатике: Напишите самый простой вариант, без массивов с цикла! (первый год изучения паскаля) напишите программу, которая в последовательности целых чисел определяет разность максимального и минимального чисел. программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube