DenGamer11
04.03.2022 01:37

Синформатикой ,работа в икселе.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
маша111221
08.09.2022 00:41

Компьютер в жизни человека.

Всё, что нас окружает создано и управляется при компьютеров.

ИТ делают нашу повседневную жизнь удобнее и безопаснее,главное то, что они нам решать любые задачи намного быстрее.

Длительная работа за компьютером приводит к изменениям в нервной, эндокринной, иммунной системах, негативно сказывается на зрении и костно-мышечном аппарате человека.

Вредные факторы, действующие на человека при работе с электронными устройствами:

•повышенная нагрузка на зрение

•нагрузка на нервную систему

•перегрузка суставов кистей

•электромагнитное излучение

•гиподинамия

Гиподинамия–это низкая двигательная активность организма, снижение общей физической активности.

0,0(0 оценок)
Ответ:
dia651
07.08.2022 10:57
1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота