director
?>

4. Определите значение переменных s и i после выполнения фрагмента программыs:=0;i:=0;while i<5 dobegin i:=i+1; s:=s+i;end;​

Информатика

Ответы

Остап-Лаврова1410

Если ты хочешь, чтобы я написал программу на языке программирования Pascal, тогда держи:

1) Если ты говоришь про разряд единиц, тогда вот программа:

Program pofignanazvanieprogrammi_1_1;

Var a:integer;

Begin

 write('Введите число -> ');

 readln(a);

 writeln(a mod 10);

End.

А если про разряд сотен тысяч, тогда:

Program pofignanazvanieprogrammi_1_2;

Var a:integer;

Begin

 write('Введите число -> ');

 readln(a);

 writeln(a div 100000);

End.

2) Угу, это легче.

Program chto_2;

Var a,S:integer;

Begin

 S:=0;

 write('Введите число -> ');

 readln(a);

 while a>=0 do

 begin

   S:=S+(a mod 10);

   a:=a div 10;

 end;

 writeln(S);

End.

Ligaevruslan

1.а) Да можно. Если ты не будешь использовать её для карыстных целей.

б)

Да, можно послать. Нет, нельзя размещать книги - это авторская работа, ты не имеешь права.

г)Да, можно, т.к цитата это не то, что попадает под авторское право, тем более, если с указанием источника.

д) Да, если картинка не имеет меток, и не попадает под авторское право.

е) Да, т.к это по сути даже реклама.

2. а) Да, если не с корыстными целями.

б)Аналогично а)

в)Да.

г)Да

д) Нет, т.к это нарушение закона, раскрытие конфиденциальности.

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

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

4. Определите значение переменных s и i после выполнения фрагмента программыs:=0;i:=0;while i<5 dobegin i:=i+1; s:=s+i;end;​
Ваше имя (никнейм)*
Email*
Комментарий*