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

ПИТОН! Условие
Добавьте в начало списка элемент, равный максимальному элементу исходного списка
Введенного с Клавиатуры.
Формат входных данных
Дан список целых чисел. Вводится одной строкой, все число грез пробел.
Формат выходных данных
Выведите исправленный список по заданию.​

👇
Открыть все ответы
Ответ:
Дашунич
Дашунич
19.10.2020
// PascalABC.NET 3.0, сборка 1144 от 16.01.2016
begin
  var a:array[1..2,1..6] of integer:=
    ((12,32,41,3,4,7),(9,19,23,24,27,39));
  Writeln(a);
  var b:=MatrixRandom(10,10,6,43);
  Writeln(b)
end.

Тестовое решение:
[[12,32,41,3,4,7],[9,19,23,24,27,39]]
[[29,39,20,21,36,34,10,25,32,40],[35,12,21,17,32,7,38,25,41,29],[6,33,17,19,30,25,34,37,21,23],[11,36,12,14,36,39,14,26,33,33],[17,34,39,30,14,34,29,19,20,26],[31,11,23,43,14,39,28,6,34,17],[43,17,10,15,35,42,6,13,25,36],[37,18,35,13,18,15,38,31,11,40],[39,21,22,38,36,43,18,12,43,40],[17,13,35,22,34,43,30,29,38,15]]
4,5(48 оценок)
Ответ:
Shvets73
Shvets73
19.10.2020
Uses crt;
function
Conv(x:byte):string;{функция преобразования чисел в строку(маска вывода)}
var
 s,t:string;
beginstr(x,t);{преобразуем число в строку}
if x=0 then s:='00'{если это ноль}else
if (x>0)and(x<=9) then s:='0'+t
{если однозначное число}
else s:=t;{двухзначное число}
Conv:=s;
end;
var ch1,mn1,sc1:byte;{начальное время}   
 chd,mnd,scd:byte;{добавленное время}   
chr,mnr,scr:byte;{результат}   
mn,ch:byte;{добавление 1 к минутам и часам, если секунд или минут >60}
begin
clrscr;
writeln('Vvedite nachalnoe vremya:');
write('  Chasy=');
readln(ch1);
write('  Minuty=');
readln(mn1);
write('  Secundy=');
readln(sc1);
writeln('Vvedite pribavlennoe vremya:');
write('  Chasy=');
readln(chd);
write('  Minuty=');
readln(mnd);
write('  Secundy=');
readln(scd);
scr:=(sc1+scd) mod 60;
mn:=(sc1+scd)div 60;
mnr:=(mn1+mnd+mn) mod 60;
ch:=(mn1+mnd+mn) div 60;
chr:=(ch1+chd+ch) mod 24;
clrscr;writeln('Nachalnoe vremya');
writeln(Conv(ch1),':',Conv(mn1),':',Conv(sc1));
writeln('vremy pribavlenia');
writeln(Conv(chd),':',Conv(mnd),':',Conv(scd));
writeln('konechnoe vremya');
writeln(Conv(chr),':',Conv(mnr),':',Conv(scr));
readkey;
end.
4,6(56 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ