1) Программа будет запрашивать ввод новых чисел, пока он не введёт число 3:
var i,count,n: Integer;
begin
while i<>3 do
begin
writeln('Введите число');
readln(n);
if n<0 then inc(count);
i:=n;
end;
writeln('Кол-во: ',count);
end.
2) Программа будет запрашивать ввод чисел, пока отрицательные числа в сумме не будут равны числу 3:
var count,n: Integer;
begin
while count<>3 do
begin
writeln('Введите число');
readln(n);
if n<0 then inc(count);
end;
writeln('Кол-во: ',count);
end.
Фотосъемка достопримечательностей относится к получению (сбору) информации.
Ниже можно не записывать, записал для понятности.
(Т.к матрица на фотоаппарате собирает пучки света на себя отправляя в процессор, процессор перерабатывает изображение в изображение .jpg)
Объяснение:
^ не ставится, но выполняет свои действия, у себя его ставьте!
Не вижу и малейшего отношения к программированию.
Что именно вы хотите видеть в программном коде ?
Ответ:
Алеша, Боря, Витя.
Алеша с кем-то идет к троллейбусу, когда подходит с ним к остановке появляется третий друг, который кричит из окна Боре (Значит Алена шел с Борей к троллейбусу). Исходя из этого Витя ездит на автобусе. Боря на троллейбусе (ибо он проводил друга до остановки, значит сам не поехал на троллейбусе, т.к. тогда было бы "вместе" шли или подобное), а значит троллейбус ему не нужен, а нужен трамвай.
Ответ:
Витя - автобус
Боря троллейбус
Алеша - трамвай.
Все. Что тут еще программировать, а ? это задача только на логику, а не на программирование..
Это фоторафии, рисунки, изображения
