Предмет: Английский язык, автор: Hdblifidnehhe

Все пожалуйсто, вознограждение 3000000000000000000 копеек

Приложения:
NatalieVK: Все номера?

Ответы

Автор ответа: NatalieVK
2

33b
She's got a car. She hasn't got a dog.
Kim and Dave haven't got a flat. They have got a house and a garden.
They haven't got a car. They have got a dog.
Matt and I have got a flat. We haven't got a house or a garden.
We've got a car. We haven't got a dog.

33c
Have you got a headache?
Has your brother got a bike?
Have they got a computer?
Has Emma got brown eyes?
Has he got a cold?
Have Mick and Anna got a car?

33d
2. have got; Have you got any aspirin?
3. No, I haven't.
4. Has Lucy got any?
5. Have Emma and Isabel got the information about the trip?
6. Yes, they have.
7. But they haven't got tickets.
8. Daniel has got them.
9. Has your cat got a CD player?
10. No, it hasn't.
11. It has got a radio and a cassette player.
12. I haven't got any cassettes...
Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Литература, автор: znanjacm
Написать сочинение на тему "Печорин - герой своего времени"
1 год назад
Предмет: География, автор: abc348976
Помогите пожалуйста, очень нужно !!​
1 год назад
Предмет: Информатика, автор: Someone2x
В числах Армстронга та Щасливих переробити функції на процедури.
Дам 80 балів.

Число Армстронга — натуральне число, яке дорівнює сумі
своїх цифр, піднесених до степеня, що дорівнює кількості його цифр. Іноді щоб вважати число таким, достатньо, щоб степені,
до яких підносяться цифри, були рівні m — тоді число можна назвати m-самозакоханим.
Наприклад: 1³ + 5³ + 3³ = 153 або 407=4 3 +0 3 +7 3 , де m = 3 (розрядність числа).
Щасливими будемо називати числа, у яких парна розрядність і сума цифр лівої половинки числа дорівнює сумі
цифр правої половинки числа.
Наприклад: 382571 3+8+2=13 5+7+1=13

Задачі:
{числа Армстронга 153,370… }
VAR
n,i:longint;
Function Roz(a:longint):byte;
VAR
k:byte;
BEGIN
k:=0;
While a>0 do
BEGIN
a:=a div 10;
k:=k+1;
END;
Roz:=k;
END;
Function St(v,m:byte):longint;
VAR
y:longint;
j:byte;
BEGIN
y:=1;
For j:=1 to m do
y:=y*v;
St:=y;
END;
Function Arm(x:longint):boolean;
VAR
k,c:byte;
s,b:longint;
BEGIN
Arm:=false;
k:=Roz(x);
b:=x;
s:=0;
while b>0 do
BEGIN
c:=b mod 10;
s:=s + st(c,k);
b:=b div 10;
END;
If s=x then Arm:=true;
END;
BEGIN
Writeln('Vvedite Chislo');
Readln(n);
For i:=10 to n do
If Arm(i) then Write(i,', ');
Readln
END.


{ Щасливі числа 22…1102…1120…}
VAR
n,i:longint;
Function Roz(a:longint):byte;
VAR
k:byte;
BEGIN
k:=0;
While a>0 do
BEGIN
a:=a div 10; k:=k+1;
END;
Roz:=k;
END;
Function St10(m:byte):longint;
VAR
y:longint;
j:byte;
BEGIN
y:=1;
For j:=1 to m do y:=y*10;
St10:=y;
END;
Function Sum(a:longint):byte;
VAR
S:byte;
BEGIN
S:=0;
While a>0 do
BEGIN
S:=S+a mod 10; a:=a div 10;
END;
Sum:=S;
END;
Function Lucky(x:longint):boolean;
VAR
k:byte;
d,xl,xr:longint;
BEGIN
Lucky:=false;
k:=Roz(x);
If k mod 2=0 then
BEGIN
d:=St10(k div 2);
xl:=x div d;
xr:=x mod d;
If Sum(xl)=Sum(xr) then
Lucky:=true;
END;
END;
BEGIN
Writeln('Vvedite Chislo');
Readln(n);
For i:=10 to n do
If Lucky(i) then Write(i,', ');
Readln
END.
1 год назад
Предмет: Геометрия, автор: слвоапмр
с решение пожалуйста​
7 лет назад
Предмет: Математика, автор: SergeyAgent007
Одно число больше другого в 11,5 раз(-а), среднее арифметическое этих двух чисел равно 35.

Найди эти числа.

Меньшее число равно .

Большее число равно .​
7 лет назад