Предмет: Информатика,
автор: imcry
ПОМОГИТЕ СРОЧНО! ОТВЕТ ОБЪЯСНИТЬ ПОДРОБНЕЕ!
В таблице Dat хранятся положотельные или отрицательные числа. Опеределите, что будет напечатано в результате паботы следующей программы. Текст программы приведен на языке прогроммирования Паскаль.
var k, m: integer;
Dat: array[1..10] of integer;
begin
Dat[1] := 5; Dat[2] := 4;
Dat[3] := -3; Dat[4] := 2;
Dat[5] := 1; Dat[6] := -10;
Dat[7] := 9; Dat[8] := 8;
Dat[9] := -7; Dat[10] := 6;
m := 1;
for k:= 1 to 10 do
if Dat[k]*m < 0 then
begin
m := Dat[k]
end;
writeln(m);
end.
Ответы
Автор ответа:
0
Ответ: 6
Решение, это и есть сама программа, поэтому не могу объяснить решение, т.к. я его делаю на раз два
imcry:
Не, ну как ты понял, что ответ именно 6? По какому алгоритму вы действовали?
Похожие вопросы
Предмет: Математика,
автор: Francoist
Предмет: Математика,
автор: tiya61
Предмет: Математика,
автор: belka1346867
Предмет: Геометрия,
автор: talaviravaleri
Предмет: Литература,
автор: Vasilie72