Запишите условие для проверки: x[-10;10].

помогите пожалуйста решить задачу,на ветке сидело n ворон,вывести эту фразу в соответствии с правилами русского языка.до 100. яз

never [62]

по введенному натуральному числу n(n<=100) обозначаешему количество ворон вывести надпись ,на дереве n ворон.где ворона склоняеться соответсвено n:'ворон'.'ворона"вороны' в случаем n превышаюшего 100 вывести надпись 'ветка обламилась'

0 0

4 года назад

Допоможіть терміново !!!Написати функцію, яка в якості параметра приймає число, яке відповідає певній годині. Потрібно щоб функц

Igorca

function Время_дня(час) {

alert(час < 4 ? "Ночь" : час < 12 ? "Утро" : час < 16 ? "День" : час < 23 ? "Вечер" : "Ночь");

}

0 0

4 года назад

Составьте программу для вычисления гипотенузы, периметра и площади прямоугольного треугольника, если известны его катеты.

Зулфалиева Эльмир...

Program z1;
var s,p,a,b,c:real;
begin
write('Введите катеты: ');
read(a,b);
c:=sqrt(sqr(a)+sqr(b)); // гипотенуза по т.Пифагора
writeln('Гипотенуза = ',c);
p:=a+b+c;// периметр
writeln('Периметр = ',p);
s:=a*b; // площадь
writeln('Площадь = ',s);
<span>end.
Жду спасибо)</span>

0 0

4 года назад

Помогите, пожалуйста. Задача, которую нужно решить на Паскале методом until. Ввести число N и M, увеличить по +1 N до M циклом и

alihan83 [6]

//Pascal ABC.NET v3.1 сборка 1172

var
n, m: integer;

begin
read(n, m);
repeat
writeln('Текущее значение N:', n, ' ,до m:', m - n);
inc(n);
until n = m;
writeln('Завершено, n=m');
end.

Пример ввода:
12
20
Пример вывода:
Текущее значение N:12 ,до m:8
Текущее значение N:13 ,до m:7
Текущее значение N:14 ,до m:6
Текущее значение N:15 ,до m:5
Текущее значение N:16 ,до m:4
Текущее значение N:17 ,до m:3
Текущее значение N:18 ,до m:2
Текущее значение N:19 ,до m:1
Завершено, n=m

0 0

4 года назад

В вазочке лежат 18 яблок и несколько груш. Сообщение о том, что из вазы достали грушу, содержит 2 бита информации. Сколько всего

Einshine Canadian...

Всего фруктов в вазе 20

0 0

4 года назад