1. Укажите, какие свойства информации отсутствуют в следующих сообщениях.
Аргументируйте свои ответы.
а) Выполни команду: стой там – иди сюда
б) 01 05 32 11 30 00 11 18 14.
в) «Сегодня очень теплая погода».
г) Реши задачу: вычислить площадь прямоугольника, если известна одна его
сторона.
д) Почтальон принес телеграмму от родственников с встретить их,
когда поезд уже прибыл на вокзал.
е) Вам принесли второй раз извещение о посылке.
2.В следующих примерах определите свойства встречающейся информации:
а) Идет вступительный экзамен по математике. Вы попросили у соседа его решение задачи. Шпаргалка содержала полное и правильное решение, но ... на японском языке.
б) На следующий день вступительная комиссия вывесила правильные решения всех задач.
в) Один персидский царь, собираясь завоевать соседнее государство, обратился к оракулу с вопросом: “Что произойдет, если я со своим войском переправлюсь через пограничную реку?” Оракул ответил: “Государь, ты разрушишь великое царство”. Удовлетворившись таким предсказанием, завоеватель переправился со своим войском через реку и был разгромлен войском противной стороны. В гневе он обратился к оракулу, обвиняя того в обмане. На что оракул ответил: “Государь, а разве твое царство было не велико?”
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
int x;
cout << "Введите число: ";
cin >> x;
if (x>7)
cout << "" << x/1.5 << endl;
else
cout << "" << x*7 << endl;
system ("pause");
}
2. #include <iostream>
using namespace std;
int main()
{
int x;
setlocale (LC_ALL, "Russian");
cout << "Введите число: " << endl;
cin >> x;
if (x % 7 == 0)
cout << "Делится" << endl;
else
cout << "Не делится" << endl;
system ("pause");
}
3. Тут зависит от номера квартиры. Допустим, номер будет 50.
#include <iostream>
using namespace std;
int main()
{
float x, y;
setlocale (LC_ALL, "Russian");
cout << "Введите первое число: ";
cin >> x;
cout << "Введите второе число: ";
cin >> y;
if (x == 50 || y == 50)
cout << "Есть" << endl;
else
cout << "Нету" << endl;
system ("pause");
}
begin
readln(a);
for i := a to 500 do
s := s + i;
writeln(s);
end.
2)
var i, a, s, c, b: integer;
begin
readln(a, b);
for i := a to b do
begin
s := s + i;
c := c + 1;
end;
writeln(s / c:4:2);
end.
3)
const N=10;
var i, b, s: integer;
a: array [0..N] of integer;
begin
readln(b);
for i := 0 to N do a[i] := random(9000);
for i := 0 to N do
if (a[i] < b) then s := s + i;
for i := 0 to N - 2 do
if (a[i+1] = b) then writeln('(', a[i], '; ', a[i+2], ')');
writeln(s);
end.
=)