Через час умоляю ! информатика 8 ! ! объясните как искать div и mod от объясните по пунктам что и как. как находить на примере. х: =336 у: =8 х: =х div у у: =х mod y объясните как можно !
Div - это обычное деление нацело, т.е. остаток отбрасывается. А mod - это как раз получение того остатка, который отбрасывается при делении div. Пусть х=336, у=8 x div y - это результат деления 336 на 8. Делим: 336 / 8 = 42 (разделилось нацело, но если бы и не нацело, все равно отбросили остаток). Конструкция x:=x div y - это оператор присваивания. Он говорит о том, что надо вычислить все, что находится справа (т.е. после) знака присваивания := и полученное значение в дальнейшем называть так, как написано до (слева) от этого знака. Следовательно, теперь Х уже будет равно не 336, а 42. y:=x mod y - снова оператор присваивания. x mod y - это остаток от деления х на у. 42 / 8 = 5 и остаток 2. Вот эта двойка и есть результат. Теперь у будет равно 2.
Если Вы ранее пользовались интернетом и все было нормально, то следует проверить компьютер на вирусы. Возможно антивирусная программа попросту устарела. Тогда, следует обновить антивирусную программу или установить новую. Если же вирусов нет, то проверьте качество сети, иногда браузеры выдают аварийную ошибку, когда прерывается связь. Это можно легко определить, на модеме будет часто и прерывисто мигать лампочка (если у вас модем допустим мегафон или что-то подобное), на стационарном модеме, подключенном к телефону, потухнет или будет гореть красным знак "собаки". Когда вы убедились, что с Вашей стороны все в порядке. то вы имеете право обратиться в "Центр управления сетями и общим доступом", или обратиться по телефону, указанному в договоре с компанией представителем услуг, с сообщением о неисправности сети. В указанный срок они обязаны устранить неполадки.
1) var s:string; i:integer; f:boolean; begin f:=false; write ('S = '); readln(s); for i:=1 to length(s) div 2 do if s[i]=s[length(s)-i+1] then f:=true else begin f:=false; break; end; if f then writeln ('PALINDROM') else writeln ('NOT PALINDROM'); readln; end.
2) var a,b:integer; count,j:integer; function palindr (n:integer):boolean; var s:string; i:integer; begin palindr:=false; str (n,s); for i:=1 to length(s) div 2 do if s[i]=s[length(s)-i+1] then palindr:=true else begin palindr:=false; break; end; end; begin write ('A = '); readln(a); write ('B = '); readln(b); count:=0; for j:=a to b do if palindr(j) then begin write (j,' '); count:=count+1; end; writeln; writeln ('Kol-vo palindromov: ',count); readln; end.
А mod - это как раз получение того остатка, который отбрасывается при делении div.
Пусть х=336, у=8
x div y - это результат деления 336 на 8.
Делим: 336 / 8 = 42 (разделилось нацело, но если бы и не нацело, все равно отбросили остаток).
Конструкция x:=x div y - это оператор присваивания. Он говорит о том, что надо вычислить все, что находится справа (т.е. после) знака присваивания := и полученное значение в дальнейшем называть так, как написано до (слева) от этого знака.
Следовательно, теперь Х уже будет равно не 336, а 42.
y:=x mod y - снова оператор присваивания.
x mod y - это остаток от деления х на у.
42 / 8 = 5 и остаток 2. Вот эта двойка и есть результат.
Теперь у будет равно 2.
Итого: х=42, у=2