intermar2000
?>

Турбо паскальКак сделать чтобы при нажатии shift и alt выводилось твое имя? ​

Информатика

Ответы

korolev-comitet8825

по факту в старых версиях это было по умолчанию

Aliferenko

var a: integer;

begin

  writeln('Введите четырехзначное число');

  readln(a);

  if a div 1000=(((a mod 1000) mod 100) mod 10) then writeln('Верно') else writeln('Не верно');

end.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            

сузанна_Людмила

for

примеры

(Pascal)

for i := 1 to 10 do

  s:=s+1;

 

(C#,C++)

for (int i=0;i<10;i++) {

   s+=i;

}

 

(Ruby)

for i in 1..10

  s=s+i

end

 

(VB, VBA, Basic,..)

for i = 1 to 10

  s=s+i

next i

 

По умлчанию шагом счетчика является 1. Обычно шаг счетчика можно менять фразой by или step by. Хотя увы такое есть не во всех языках

 

(C#,C++)

for (int i=0;i<10;i=i+2) {

   s+=i;

}

 

(VB, VBA, Basic,..)

for i = 1 to 10 step by 2

  s=s+i

next i

 

Например в паскале возможен только обратный отсчет

for i := 10 downto 1 do

  s:=s+1;

 

еще for примечателен тем, что даже если конец меньше начала (в варианте увеличения счета), то цикл все равно пройдет один раз. Правда не знаю подпадают ли под это правило языки из группы С

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Турбо паскальКак сделать чтобы при нажатии shift и alt выводилось твое имя? ​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

avdeevo
Amulenkov
zanthia94
VadimovichSvetlana622
Moroshkina-Aristova2011
Mashkov-Daniil1764
Yevsyukov1697
balabina-Olesya
Natalya1895
kate281078
Faed_Arakcheeva
Abespal
okunevo2010
cutur3414
msk27