Program z1;
var
a,b,c,d:integer;
begin
writeln('Введите число a и число b');
readln(a,b);
c:=sqr(max(a,b));
d:=min(a,b)+1;
writeln('Первое число ',c,', второе число ',d);
<span>end.
Исправил</span>
Ответ:
Выделяем изображение. Правой кнопкой мыши вызываем окно свойств изображения. В этом окне выбираем пункт "Вставить название..." (возможны другие схожие варианты написания). В появившемся окне, в разделе "положение", выбираем вариант "Под выделенным объектом", в разделе "подпись" можно выбрать готовый текст - Рисунок, Таблица, Формула, а если эти текста не устраивают, то создаём свои в пункте "Создать...". В этом же окне нажимаем "ОК". Как-то так...
Объяснение:
3 Информация - совокупность сведений, знаний о чем-либо; сообщение - совокупность знаков , отображающих информацию.
4 Кодирование - зашифровка информации (перевод языка на азбуку Морзе),декодирование - расшифровка( расшифровка сообщения с азбуки Морзе,к примеру, на русский язык).
5 Кол-во информации предотвращает неопределенность.Неопределенность информации характеризуется энтропией, хаосом.
6 Актуализация информации - совокупность действий по обновлению, расширению, восстановлению информации для эффективности ее использования.
7 Актуальность, полнота, доступность,понятность (т.е. понятна для восприятия)
Program n1;
var a: array[1..18] of integer;
i,k: integer;
begin
randomize;
k:=0;
writeln('исходный массив:');
for i:=1 to 18 do
begin
a[i]:=random(87)-4;
write(a[i],' ');
if a[i] mod 2=0 then k:=k+1;
end;
writeln;
write('k четн: ',k);
end.
