Регистрация Спросить otvet5GPT
inkakanchiyp0706d
23.06.2023 02:22
Информатика
Есть ответ 👍

Дано натуральное число n. найти сумму первой и последней цифры этого числа. верно ли что данная сумма больше 10? дано натуральное число n. переставить последнюю и первую цифры этого числа. верно ли, что после перестановки число стало четным? дано натурa.льное число n. найти произведение нечетных цифр числа. верно ли, что произведение является трехзначным числом? дано натуральное число n. верно ли, что в записи числа три раза встречается цифра 5? найти все делители натурального числа n. верно ли, что их количество , есть четное число? решите в pascal

145
478
Посмотреть ответы 2

Ответы на вопрос:

очароваш
очароваш
4,7(22 оценок)
// pascalabc.net 3.3, сборка 1634 от 14.02.2018 // внимание! если программа не работает, обновите версию! №1 begin   var n: =readinteger('n=');   var s: =n mod 10;   n: =n div 10;   var d: integer;   while n> 0 do (d,n): =(n mod 10,n div 10);   s+=d;   writeln('сумма ',s);   if s> 10 then writeln('верно') else writeln('неверно') end. №2 begin   var s: =readinteger('n=').tostring;   var n: =s.length;   (s[1],s[n]): =(s[n],s[1]);   s.println;   if s[n].todigit.iseven then writeln('верно') else writeln('неверно') end. №3 begin   var n: =readinteger('n=');   var p: =1;   while n> 0 do begin       var d: =n mod 10;       if d.isodd then p*=d;       n: =n div 10       end;   writeln('произведение ',p);   if p.inrange(100,999) then writeln('верно') else writeln('неверно') end. №4 begin   var n: =readinteger('n=');   var k: =0;   while n> 0 do begin       if n mod 10=5 then k+=1;       n: =n div 10       end;   if k=3 then writeln('верно') else writeln('неверно') end. №5 begin   var n: =readinteger('n=');   var k: =1;   writeln('делители: ');   for var i: =1 to n div 2 do       if n mod i=0 then begin           print(i);           k+=1           end;   writeln(n);   if k.iseven then writeln('верно') else writeln('неверно') end.
аноним56889
аноним56889
4,4(31 оценок)

файл объемом 500 кбайт

общий объем информации в битах    

ooи =500 кбайт =512000 байт =4096000 бит

скорость передачи v=128000 бит/с

время передачи t= оои / v =4096000 бит /  128000 бит/с = 32 c

ответ 32 секунды

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS