Категория
Информатика, опубликовано 09.01.2019 16:01

С клавиатуры вводится последовательность ненулевых целых чисел. 0 - конец последовательности. Выяснить, является ли произведение отрицательных чисел отрицательным?

И вторая задачка
С клавиатуры вводится последовательность из N целых чисел. Подсчитать сумму чисел, больших заданного числа А.

пжлст)

Ответы

Ответ
Ответ оставил: Гость
Формула для нахождения диагонали квадрата: d=a корень из 2 тоесть в данном случае, сторона равна 2 корень из 2
Ответ
Ответ оставил: Гость
1. var a,z: integer; begin z: =1; readln(a); while a< > 0 do   begin   if a< 0 then z: =-z;   readln(a);   end; if z=-1 then writeln('произведение отрицательных чисел отрицательно') else writeln('произведение отрицательных чисел положительно'); end. пример: 12 -45 -87 -20 0 произведение отрицательных чисел отрицательно2.var n,a,x,s,i: integer; beginreadln(n,a); s: =0; for i: =1 to n do  begin  readln(x);   if x> a then s: =s+x  end; writeln('s = ',s); end.пример: 5 304815802932s = 160
Ответ
Ответ оставил: Гость
Весь ответ в картинке

Ответ
Ответ оставил: Гость
Var
a, b, c, min: longint;
begin
readln(a, b, c);
min:=a;
if b < min then min:=b;
if c < min then min:=c;
writeln(min);
readln;
end.
Ответ
Ответ оставил: Гость
Это сложный вопрос. И это как то не связанно с информатикой


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 3 на вопрос по информатике: С клавиатуры вводится последовательность ненулевых целых чисел. 0 - конец последовательности. Выяснить, является ли произведение отрицательных чисел отрицательным? И вторая задачка С клавиатуры вводится последовательность из N целых чисел. Подсчитать сумму чисел, больших заданного числа А. пжлст)... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube