samat314
14.04.2022 06:12

HTML
Можете прописать как это должно выглядеть в "Блокноте"

1)Создайте веб-страницу "Обо мне", которая отобразит в окне браузера вашу фамилию, имя и отчество. Название страницы выведите в заголовок вкладки браузера. Фамилию выведите в первом абзаце страницы, имя и отчество - во втором абзаце, в pазних строках.

2)4. Создайте веб-страницу "Природа Украины", которая выведет в окно браузера сведения об интернет-ресурсы, посвященные природе Украины:
nature.land.kieо.uа,
pryroda.in.ua,
Eсо-live.com.uа.
Название страницы выведите в заголовок вкладки браузера. Установите светло-зеленый цвет фона страницы (lightgreen). В трех абзацах введите описание сайтов, посвященных сохранению природы Украины: название сайта (зеленым цветом увеличенного размера), 2-3 предложения о сайте, ссылка на страницу сайта. Вставьте по одному изображению, что содержатся на указанных сайтах.​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Alisa6666666666666
21.06.2021 05:47
Const   N = 10;   
var   a, S1, S2: Integer;   
i, Q1, Q2: Byte;   
begin   
S1 := 0; Q1 := 0;   
S2 := 0; Q2 := 0;  
writeln('Введите ', N, ' чисел:');   
for i := 1 to N do 
begin     
read(a);     
if a < 0 then 
begin      
S1 := S1 + a;       
inc(Q1)     
end;     
if a > 0 then 
begin       
S2 := S2 + a;       
inc(Q2)     
end;   
end;   
writeln;   
if Q1 > 0 then 
begin     
writeln('Сумма отрицательных чисел: ', S1);     
writeln('Количество отрицательных: ', Q1)   
end   
else 
writeln('Отрицательных нет');   
if Q2 > 0 then
begin     
writeln('Сумма положительных чисел: ', S2);     
writeln('Количество положительных: ', Q2)   
end   
else 
writeln('Положительных нет') 
end.
0,0(0 оценок)
Ответ:
marushakeduard
21.06.2021 05:47
Const   N = 10;   
var   a, S1, S2: Integer;   
i, Q1, Q2: Byte;   
begin   
S1 := 0; Q1 := 0;   
S2 := 0; Q2 := 0;  
writeln('Введите ', N, ' чисел:');   
for i := 1 to N do 
begin     
read(a);     
if a < 0 then 
begin      
S1 := S1 + a;       
inc(Q1)     
end;     
if a > 0 then 
begin       
S2 := S2 + a;       
inc(Q2)     
end;   
end;   
writeln;   
if Q1 > 0 then 
begin     
writeln('Сумма отрицательных чисел: ', S1);     
writeln('Количество отрицательных: ', Q1)   
end   
else 
writeln('Отрицательных нет');   
if Q2 > 0 then
begin     
writeln('Сумма положительных чисел: ', S2);     
writeln('Количество положительных: ', Q2)   
end   
else 
writeln('Положительных нет') 
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота