Ограничение времени 1 секунда Ограничение памяти 64Mb Ввод стандартный ввод или input.txt Вывод стандартный вывод или output.txt Маленький домик с девочкой Дороти и щенком Тото, унесённый ураганом, приземлился, наконец, в стране Жевунов. Как же здесь было красиво! Ярко зеленела трава, на деревьях зрели сочные плоды, повсюду росли чудесные цветы. У них были такие причудливые названия, что Дороти боялась их так сразу не запомнить и просила называть сначала только те, что покороче. Напишите программу, которая определить названия, которые короче числа. Формат ввода Вводится число и две строки. Формат вывода Нужно вывести только строку, длина которой меньше числа. Если обе короче, то вывести каждую с новой строки в обратном алфавитном порядке. Если нет, то вывести число. Пример 1 Ввод Вывод 9 Традесканция Амариллис 9 Пример 2 Ввод Вывод 10 Анемона Араукария Араукария Анемона ОЧЕНЬ НУЖНА
Ответы
Объяснение:
1. БЕЗ ПРИЗНАКОВ ЖИЗНИ (нет изображения, звуковых сигналов, не включаются светодиоды на системной плате и вентилятор ЦП)
2. ПК РАБОТАЕТ, НЕТ ИЗОБРАЖЕНИЯ (вентилятор ЦП работает, светодиоды материнской платы горят, но видеосигнала на мониторе нет)
3. BIOS ПРЕКРАЩАЕТ РАБОТУ (компьютер работает, но BIOS внезапно прекращает свою работу с ошибкой)
4. НЕ УДАЕТСЯ ЗАГРУЗИТЬ WINDOWS (появляется логотип ОС, но пользовательский интерфейс не загружается)
5. ПК РАБОТАЕТ СО СБОЯМИ (компьютер загружается, но «зависает» через некоторое время или под нагрузкой)
6. НЕ РАБОТАЮТ КОМПОНЕНТЫ ПК (проблемы с изображением или звуком, а также с портом USB и модулем Wi-Fi или приводом CD, DVD)
№1
var a, b, c: integer;
begin
read(a, b, c);
if((a = b) or (b = c) or (c = a)) then
write('Треугольник равнобедренный')
else
write('Треугольник неравнобедренный');
end.
БЛОКСХЕМА:
начало
ввод сторон(a, b, c)
если a = b или b = c или с = a, то
вывести: 'треугольник равнобедренный'
иначе вывести: 'треугольник неравнобедренный'
конец
№2
var n, s, i: integer;
begin
s := 0;
read(n);
for i := 20 to n do begin
if (i mod 2 <> 0) then s := s + i;
end;
write(s);
end.
БЛОКСХЕМА:
начало
s := 0, i := 20
ввод числа n
пока i не равно n
если i - нечётное, то
прибавить к s
вывести s
конец
var a, b, c: integer;
begin
read(a, b, c);
if((a = b) or (b = c) or (c = a)) then
write('Треугольник равнобедренный')
else
write('Треугольник неравнобедренный');
end.
БЛОКСХЕМА:
начало
ввод сторон(a, b, c)
если a = b или b = c или с = a, то
вывести: 'треугольник равнобедренный'
иначе вывести: 'треугольник неравнобедренный'
конец
№2
var n, s, i: integer;
begin
s := 0;
read(n);
for i := 20 to n do begin
if (i mod 2 <> 0) then s := s + i;
end;
write(s);
end.
БЛОКСХЕМА:
начало
s := 0, i := 20
ввод числа n
пока i не равно n
если i - нечётное, то
прибавить к s
вывести s
конец
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
АПостройте таблицу истинности для заданного логического выражения:
Автор: morsh9345
Составить эквивалентную запись выражения : a*sqrt(abc(sin(b*c+
Автор: Vipnikavto58
Выбери датчик, используемый в предложенном программном коде.
Автор: ПаничерскийЕлена
600×800 сделайте размерное окно в зеленый цвет введите код программы для раскрашивания)
Автор: margarita25061961
Прикрепленный файл
Объяснение: фото