Контрольные во Для чего предназначена программа InternetExplorer?
2. Описать окно InternetExplorer. Назвать основные блоки окна, объяснить их
предназначение.
3. Расскажите о командах контекстных меню программы InternetExplorer.
4. Расскажите о предназначении каждой из кнопок панели инструментов
программы InternetExplorer.
5. По каким признакам можно определить ссылку на странице документа?
6. Каким образом в текущем сеансе работы с программой InternetExplorer можно
вернуться к ранее документу? Следующему документу?
7. Как найти какое-либо слово (несколько слов) на текущей странице?
8. Каким образом можно остановить загрузку текущего документа?
9. Для чего существует папка «Избранное»?
10. Как следует задать поисковую фразу в поисковой системе Rambler, если
необходимо найти документ содержащий два отдельных слова?
begin
writeln ('Введите 5 чисел через пробел: ');
readln (a1,a2,a3,a4,a5);
begin
if (a1>a2) then max:= a1else max:=a2;
if (a2>a3) then max:=a2else max:=a3;
if (a3>a4) then max:=a3else max:=a4;
if (a4>a5) then max:=a4else max:=a5;
end;
writeln (max);
end.
Аналогично с минимальным числом.
var a1,a2,a3,a4,a5,min: integer;
begin
writeln ('Введите 5 чисел через пробел: ');
readln (a1,a2,a3,a4,a5);
begin
if (a1<a2) then min:= a1else min:=a2;
if (a2<a3) then min:=a2else min:=a3;
if (a3<a4) then min:=a3else min:=a4;
if (a4<a5) then min:=a4else min:=a5;
end;
writeln (min);
end.
Можно так же решить с массива, если нужно пишите.
def automate(n)
a = n / 1000
b = n / 100 % 10
c = n / 10 % 10
d = n % 10
t = [a*b, c*d]
return (t.max.to_s + t.min.to_s).to_i
end
def zadanie()
for i in 1000..9999
t = automate(i)
p [t, i] if t == 174
end
end
# Примеры применения
zadanie()
ответ - нет таких цифр
Аналитическое решение
174 можно разложить на 1 + 74 и 17 + 4
по правилу 2 это только 17 + 4
17 - произведение двух чисел, но 17 простое и произведение только 17 и 1. 17 не может быть одной цифрой
Значит вариант 174 невозможен при таких правилах