1) var a,b: integer ;
begin
readln(a);
b:=(a mod 10)+(a div 10);
if ((b mod 7=0) and ((a div 10) mod 2 =0)) then writeln ('верно') else writeln ('не верно')
end.
2)var a,b,i: integer;
begin
readln(a);
for i:=1 to 3 do
if a mod 10 > 3 then begin b:=b+1; a:=a div 10; end;
if b=3 then writeln ('верно') else writeln ('не верно')
end.
3)var a,b,c,d,i: integer;
begin
readln (a);
b:= b+a mod 10;
d:= a div 10000;
b12:=b+d mod 10;
a:=a div 10;
for i:=1 to 3 do begin c:=c+a mod 10; a:=a div 10 end;
if c mod b =0 then writeln ('верно') else writeln ('не верно') ;
end.
1) при установке необходимого ему программного обеспечения на персональный компьютер;
2) при создании текстовых, графических и других документов;
3) при переносе (копировании) на свой компьютер фотографий, текстов, музыки, видеофильмов и другой информации, хранящейся на различных устройствах внешней памяти или в сети Интернет;
4) при сохранении на своём компьютере ссылок на заинтересовавшие его сетевые ресурсы и т. д.
Индивидуальное информационное пространство (ИИП) - информационные ресурсы, доступные пользователю, когда он работает на ПК. Люди формируют ИИП, создавая документы, устанавливая ПО, сохраняя на ПК файлы с других носителей и из интернета. Создавая ИИП, следуйте простым правилам: достоверность данных; отсутствие информации, оскорбляющей честь и достоинство людей; отсутствие угроз в адрес других людей; запрет на пропаганду насилия, терроризма и национальной розни; отказ от распространения вирусов.