Var x,y:real;
begin
readln(x,y);
if (y<x)and(x*y<0)
then writeln('Yes') else writeln('No');
end.
Пример:
1 -2
Yes
Program test;
const n = 100;
var i,k:integer;
m: array[1..n] of integer;
begin
randomize;
for i:=1 to n do m[i]:=random(1,100);
for i:=1 to n do if m[i] mod 2 =0
then inc(k);
writeln('Количество четных чисел: ',k);
end.<span>
</span>
1.Не употреблять пищу, находясь за компьютером.
2.Перед использованием компьютера мыть руки, чтобы не загрязнять клавиатуру и мышь.
3.Не трогать пальцами монитор
4.Не выдергивать из компьютера какие-либо шнуры во время его работы.
5.Не выключать компьютер с помощью кнопки, выдергивания шнура питания.
6.Выключать компьютер только через "пуск"-"завершение работы".
7.Находиться на расстоянии 20-30см от монитора.
8.Не делать резких движений при работе с компьютером.
9.Держать свое рабочее место в чистоте и порядке.
10.Переодически очищать компьютер от загрязнений специальными влажными салфетками.
12.Не изменять настройки, не зная результата
13.Не работать за компьютером одновременно более чем одному человеку.
14.При долгой работе с компьютером делать зарядку для глаз и тела
15.Не работать за компьютером более 3 часов в день за избежание вреда для здоровья.
Последовательность Фибоначчи образуется так: каждый следующий член равен сумме двух предыдущих(1,1,2,3,5,8,13,,,,)Дано натур. чи
xxx2036
#include <iostream>
using namespace std;
int main()
{
int seqEl[3] = {1, 1, 2};
int n;
cout << "N = ";
cin >> n;
// Вывод первых 3-х членов
cout << seqEl[0] << endl << seqEl[1] << endl << seqEl[2] << endl;
for (int i = 2; i < n; i++)
{
seqEl[0] = seqEl[1];
seqEl[1] = seqEl[2];
seqEl[2] = seqEl[0] + seqEl[1];
cout << seqEl[2] << endl;
}
return 0;
}
Задача 1:
25 * 40 * 5 = 5000 (Б)
5000 / 1024 = 4,88 (КБ)
Ответ: 5000, 4,88.
Задача 2:
32 * 64 = 2048 — символов на страницу
2048 / 1024 = 2 (КБ) — килобайт на страницу
512 / 2 = 256 (КБ) — страниц в книге
Ответ: 256.