Program prog; var a,i,s:integer; begin s:=0; writeln('Укажите начало отрезка '); readln(a); for i:=a to a+10 do begin if a mod 2 = 1 then s:=a+s; end; write('Сумма нечетных 10 элементов начиная с ',a,' равна ',s); end.
Салат оливье. ингредиенты 1 баночка зеленого горошка (400г) 300 г мяса 4 яйца 350 г картофеля 100 г соленых или маринованных огурцов 150 г лука соль майонез алгоритм приготовления: 1.мясо отварить до готовности (варить около 40 минут после закипания) . 2.остудить. 3.лук мелко покрошить. 4.залить его кипятком и оставить на 10 минут, затем воду слить, лук промыть в холодной воде. 5.мясо нарезать кубиками. 6.картофель почистить, нарезать кубиками. 7. яйца мелко покрошить. 8.огурцы мелко нарезать. 9.смешать картофель, мясо, лук, горошек (воду слить) , яйца, огурцы. 10.посолить. 11. заправить майонезом. 12. украсить по вкусу, например зеленым горошком
2) Номер страницы 3) Библиотечный каталог — совокупность расположенных по опр-м правилам библиографических записей на документы, раскрывающих состав и содержание фонда библиотеки или информационного центра. 4) Жёсткий диск 5) Полное имя может включать следующее: протокол или доступа имя или адрес компьютера, узла сети устройство хранения, диск путь к каталогу собственно имя файла, которое может содержать его расширение версия или номер ревизии 6) Область поиска - область памяти, в пределах которой осуществляется поиск
var a,i,s:integer;
begin
s:=0;
writeln('Укажите начало отрезка ');
readln(a);
for i:=a to a+10 do begin
if a mod 2 = 1 then
s:=a+s;
end;
write('Сумма нечетных 10 элементов начиная с ',a,' равна ',s);
end.