маняня4
22.12.2020 01:34

Як виконається умова if none = 0 print ta-da​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Dashakrasaveta
10.04.2023 06:31

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

б)

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

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

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

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

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

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

в)Да.

г)Да

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

0,0(0 оценок)
Ответ:
marek2
13.10.2022 17:46

Если ты хочешь, чтобы я написал программу на языке программирования 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.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота