Информатика, опубликовано 2018-08-22 20:25:41 by Гость
Найти количество отрицательных чисел среди 10 введенных из клавиатуры. Информатика, написать программу в паскале.
Ответ оставил Гость
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var k:=0;
for var i:=1 to 10 do begin
var n:=ReadInteger(i+:);
if n end;
Print(Отрицательных,k)
end.
Тестовое решение:
1: 56
2: -14
3: 34
4: 8
5: 0
6: -4
7: -3
8: 9
9: 13
10: 5
Отрицательных 3
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на