Dear Diary, I’ve been here for two weeks and I’m amazed at how much fun I'm having at Sunshine Teen Camp. It’s such an - №34211790

Dear Diary, I’ve been here for two weeks and I’m amazed at how much fun I'm having at Sunshine Teen Camp. It’s such an
- Предмет:
  Другие предметы
- Автор:
  pork chopcu4o
- 4 года назад

Ответы 1

1) A2) B3) C
- Автор:
  addisonanderson
- 4 года назад
- 0
Добавить свой ответ

Еще вопросы

В конце у меня получается число z
Мне надо если оно равно p то тогда вывести его а если не равно то p присвоить z и снова прогонять цикл. как это сделать.

Var a:array[1..50] of byte;
n,p, i,k,m,j,x,y,z: integer;
begin
writeln('Введите количество элементов');
readln(p);
n:=4;
repeat
for i:=n downto 1 do begin
a[i]:=p mod 10;
p:= p div 10;
end;
For i:=1 To n Do Begin
k := i;
For j := i + 1 To n Do
If a[j] >= a[k] Then
k := j;
m := a[i];
a[i] := a[k];
a[k] := m;
end;
x:=a[1]*1000+a[2]*100+a[3]*10+a[4];
For i := 1 To N - 1 Do Begin
k := i;
For j := i + 1 To n Do
If a[j] <= a[k] Then
k := j;
m := a[i];
a[i] := a[k];
a[k] := m;
end;
y:=a[1]*1000+a[2]*100+a[3]*10+a[4];
z:=x-y;
until z<>p;
writeln(z);
end.
- Предмет:
  Информатика
- Автор:
  ivyhogan
- 4 года назад
- Ответов:
  
  2
- Смотреть
Посмотрите на картинки и скажите, как долго: 1.люди знают друг друга: 2. у них эти вещи: 3. они находятся в этом месте:
- Предмет:
  Другие предметы
- Автор:
  nataly
- 4 года назад
- Ответов:
  
  1
- Смотреть
Помогите найти производную в точке х=2
- Предмет:
  Математика
- Автор:
  braxton697
- 4 года назад
- Ответов:
  
  1
- Смотреть
Какому из направлений соответствует азимут 315⁰? 1) север 2) восток 3) юго-запад 4) северо-запад
- Предмет:
  География
- Автор:
  oscarc0nt
- 4 года назад
- Ответов:
  
  1
- Смотреть

How much to ban the user?

1 hour 1 day 100 years