Подсчитать сумму четных, не делящихся без остатка на 8 чисел от 5 до 75.по паскалю. надо, заранее : *

Var s,i: integer; begin for i: =5 to 75 do if i mod 8 < > 0 then s+=i; writeln(s); end.

{{15x+20y+30z=270} var x,y,z, y1,x1: integer; begin   x1: =270 div 15;   for x: =1 to x1 do   begin       y1: =(270-15*x) div 20;       for y: =1 to y1 do         begin               z: =(270-15*x-20*y) div 30;               if 1(5*x+20*y+30*z=270)  and (z< > 0) then               writeln(x: 5,y: 5,z: 5,'proverka',15*x+20*y+30*z=270);           end;     end; end. ответ       2      3      6proverkatrue       2      6      4proverkatrue       2      9      2proverkatrue       4      3      5proverkatrue       4      6      3proverkatrue       4      9      1proverkatrue       6      3      4proverkatrue       6      6      2proverkatrue       8      3      3proverkatrue       8      6      1proverkatrue     10      3      2proverkatrue     12      3      1proverkatrue проверку можно убрать. используем два цикла для перебора, а z -вычисляем

< ! doctype html> < html>       < body>           < h1> тюлени< /h1>           < p> тюлени — общее название двух семейств млекопитающих< /p>       < /body> < /html> давайте разберём построчно: < ! doctype html> - здесь указывается тип документа, чтобы браузер не путался и понимал, как интерпретировать дальнейший код. < html> < /html> - это  контейнер, который заключает в себе все содержимое веб-страницы. < body> < /body> - здесь хранится содержимое (контент) веб-страницы. < h1> < /h1> - заголовок первого уровня, обычно самый важный на странице < p> < /p> - текстовый абзац как выделить слово "тюлени" черным шрифтом? по умолчанию цвет шрифта - чёрный. если вы имели ввиду жирное начертание, то нужно написать так: < p> < strong> тюлени< /strong>   — общее название двух семейств  млекопитающих< /p> < strong> < /strong> - этот тег пишет жирным шрифтом всё, что заключено внутри.