17. пиксели (px)
14. На сколько знаю форматирование это удаление всех файлов с накопителя (флешки)
4.Фотошоп, Illustrator, Sketch (здесь не уверен) Ну фотошоп сам использовал для создания макета дизайна.
2. Наверное Word
Где ты это нашел? Я такого на курсах не проходил даже...
Ручка - шариковая ручка, ручка ребёнка, дверная ручка.
Киви - продукт Киви, птица Киви
Uses crt;
var i,s:integer;
a:array[1..5] of integer;
begin
randomize;
s:=0;
for i:=1 to 5 do
begin
a[i]:=random(15)-5;
if a[i]>0 then s:=s+a[i];
end;
writeln(s);
readln;
end.
uses crt;
var i,s:integer;
a:array[1..7] of integer;
begin
s:=0;
randomize;
for i:=1 to 7 do
begin
a[i]:=random(15)-5;
if ((a[i]>0) and (a[i] mod 2 = 0)) then inc(s);
end;
writeln(s);
readln;
end.
uses crt;
var i,s:integer;
a:array[1..6] of integer;
begin
s:=1;
randomize;
for i:=1 to 6 do
begin
a[i]:=random(15)-5;
if (a[i]>0) then s:=s*a[i];
end;
writeln(s);
readln;
end.
Function IsPrime(n:longint):boolean;
var
found:boolean;
p:longint;
begin
if n<4 then IsPrime:=True
else begin
found:=(n mod 2=0);
p:=3;
while (not found) and (sqr(p)<=n) do
begin found:=(n mod p=0); p+=2 end;
IsPrime:=not found
end
end;
var
a,b,i:longint;
begin
Write('Введите начало и конец интервала: ');
Readln(a,b);
for i:=a to b do
if IsPrime(i) then Write(i,' ');
Writeln
end.