В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История

Продемонстрировать полученные на уроках информатики знания и умения по представлению объектов окружающего мира с словесных описаний,таблиц,диаграмм,схем,графических изображений

Показать ответ
Ответ:
melanieе
melanieе
07.09.2022 04:04

1)

 

program pr1;

var i:integer; n,n2,n3:real;

begin

for i:=1 to 3 do begin

  writeln('daite tzifru'); readln(n);

  if n in [1..3] then writeln('Prenodlejit intervalu') esle writeln('Ne prenodlejit intervalu');

 end;

readln;

end.

 

2)

 

program p2;

var i,c,cod,summa:integer; s:string;

 

begin

 writeln('daite tzivfru'); readln(s);

  for i:=1 to length(s) do

   begin

     val(s[i],c,cod); summa:=summa+c;

   end;

str(summa,s);

if length(s)>1 then writeln('Summa ne yavljaetsya odnoznachnim chislom: ',s) else

 writeln(Summa  yavljaetsya odnoznachnim chislom: ',s);

readln;

end.

0,0(0 оценок)
Ответ:
Lol11111111000
Lol11111111000
10.03.2022 17:47

В числе не меньше трех цифр меньше пяти, значит максимум две могут быть больше. Для того, чтобы получить максимально возможное число ставим 9 и 9 в первые разряды (число сотен и десятков тысяч) . Т. е. наше число пока будет начинаться на 99. Поскольку цифр меньше пяти минимум три, дописываем к нашему числу три четверки, поскольку это максимальное число меньшее пяти. Получаем число 99444. Видим, что нечетных чисел здесь два, а должно быть минимум три. Для того, чтобы число осталось максимальным из возможных меняем четверку в конце на тройку. Получаем окончательно 99443.

ответ: 99443

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота