Ответ:
program p_1;
const n=15;
var i:integer;
p:real;
a:array [1..n] of integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(130)-50;
writeln('a[',i,'] = ',a[i])
end;
p:=1;
for i:=1 to n do p:=p*a[i];
writeln;
writeln('p = ',p)
end.
Var a,b,c,d:integer;
begin
readln(a,b,c,d);
writeln('Нельзя составить треугольник из:');
if (a+b<=c)or(a+c<=b)or(b+c<=a) then writeln(a,' ',b,' ',c);
if (a+b<=d)or(a+d<=b)or(b+d<=a) then writeln(a,' ',b,' ',d);
if (a+c<=d)or(a+d<=c)or(c+d<=a) then writeln(a,' ',c,' ',d);
if (b+c<=d)or(b+d<=c)or(c+d<=b) then writeln(b,' ',c,' ',d);
end.
Пример:
1 2 3 4
<span>Нельзя составить треугольник из:
1 2 3
1 2 4
1 3 4</span>
Плюсы:Если пишешь конспект,и т.д, то можно его написать в электронном виде,на компьютер можно установить игры и это буднт развлечением,на компьютер можно хранить важные документы,гапример в отднльной папке,а на папку поставить пароль,и они никуда не пропадут.
Минусы:портит зрение,жрет много электричества,игры иногда зптягивают и вызывают зависимость
Под определение "организация" здесь подходит только 2 и 4. Но 2 занимается веб-дизайном, тогда ответ - 4.
Напишите код на языке Pascal
Сергей живёт на окраине города и поэтому, чтобы добраться до офиса, ему приходится каждый день проезжать n станций метро. Оказалось, что на каждую станцию метро тратится t1 минут. Но не так давно Сергей купил свою первую машину и теперь он тратит на дорогу гораздо меньше времени! На пути к офису расположено k кварталов (каждый машина проезжает за t2 минут) и m светофоров (на каждом машина стоит t3 минут) Сергею стало интересно на сколько быстрее его новый способ передвижения. Помогите ему ответить на этот вопрос!
Формат ввода
В первых трёх строках через записаны целые числа n, k и m - количество станций, кварталов и светофоров соответственно (0 ≤ n, k, m ≤ 1000). В следующих трех строках целые числа t1, t2 и t3 - время, которое тратится на преодоление одной станции метро, квартала и светофора соответственно (0 ≤ t1, t2, t3 ≤ 1000).
Формат вывода
Выведите одно число - на сколько быстрее Сергей добирается от дома до своего офиса. Если же способ передвижения на машине дольше чем на метро, то выведите -1.