AHgpyxa
14.02.2023 11:13

Принципы разработки и реализации эффективной структуры сайта

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
DanilPRO20172007
21.05.2023 21:02

у сучасному світі виникла велика кількість нових явищ, які мають на людину великий вплив. одним з таких є інтернет. інтернет, напевно, став займати дуже важливе місце в житті кожної людини. він стосується всього, що має відношення до будь-якої інформації або обміну нею. в інтернеті сьогодні сидять усі – починаючи від школярів і закінчуючи людьми похилого віку, він корисний для всіх. однак далеко не факт, що інтернет дає одну лише користь. до всіх явищ, в тому числі і самих корисних, слід ставитися з належною часткою критики, тому я пропоную розглянути ризики, пов’язані з впливом інтернету на людину.

по-перше, є чисто фізіологічний ризик. інтернет вимагає уваги, а увагу далеко не так просто приділити, якщо ти знаходишся в русі. отже, інтернет змушує тебе сидіти на одному місці і не рухатися. а це загрожує виникненням проблем зі здоров’ям. тому людина не повинна поринати в інтернет з головою. потрібно залишати місце для активної спортивної діяльності, спілкування з іншими, будь-якого руху. в іншому випадку можна отримати серйозні проблеми і пошкодувати про те, що проводив так багато часу за комп’ютером.

0,0(0 оценок)
Ответ:
диана128
30.08.2020 14:04
//Это можно стереть. Если в N есть 0 то тогда программа выведет NO.
program z1;
var b,c,d,i,s,l:integer;   
a:string;
begin
read(a);
b:=length(a);
s:=StrToInt(a);
c:=0;
for i:=1 to b do 
for i:=1 to b do 
begin 
d:=StrToInt(a[i]); 
if d=0 then l:=1; 
end;
if l=0 then begin                 
for i:=1 to b do                     
for i:=1 to b do                     
begin                     
d:=StrToInt(a[i]);                     
if (s mod d)=0 then c:=c+1;                     
end;           
end           
else           
write('NO');if (l=0) and (c=b) then write('T');
if (l=0) and (c<>b) then write('P');
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота