Ответ:
какой пробел ты не написал ни чего
Объяснение:
//Вариант 2
//Pascal ABC.NET v3.0 сборка 1111
Var
i,max,n,a:integer;
begin
readln(n);
max:=-2147483648;
i:=1;
while i<>n+1 do
begin;
readln(a);
if (max<a) and (a mod 2=0) then max:=a;
i:=i+1;
end;
write(max);
<span>end.
</span>
Пример ввода:
4
1
2
3
4
Пример вывода:
4
Выделить <div> место для вашей картинки, дальше дать ему стиль.
Пример
<html><head></head><body><div style="width: 100%; height:200px; background-color: blue"></div></body></html>
Вместо цвета, можно использовать картинку
Информация-сведенье о чем-либо.
Информатика-это наука,изучающая методы представления,передачи и обработки информации с помощью компьютера.
<span>Компьютер- устройство, способное автоматически выполнять заданную последовательность операций.
Файл-это именованный набор данных.
Текстовый редактор- самостоятельная компьютерная программа, где можно создавать и изменять текстовые данные.
Графический редактор- специальная компьютерная программа, предназначенная для автоматизации процессов построения на экране дисплея графических изображений. </span>
Var
flag,i,x,y:integer;
begin
x:=Random(0,99);
flag:=0;
for i:=1 to 10 do begin
write('Введите ваше число ');
readln(y);
if (x = y) then begin
flag:=1;
writeln('Дан правильный ответ!');
break
end
else
if (x < y) then
writeln('Попробуйте взять число поменьше')
else
writeln('Попробуйте взять число побольше');
end;
if flag = 0 then writeln('Все попытки исчерпаны');
end.