Дан массив на 10 целых чисел. заполняется с клавиатуры числами от 1 до 9. определить строки в которых есть 5

edbaldin2017 edbaldin2017    1   31.08.2019 11:10    0

Ответы
lisaezhikova lisaezhikova  26.04.2020 14:02
Var A: array [1..10] of integer;                                                                                          i,b: integer;                                                                                                                begin                                                                                                                                for i:=1 to 10 do                                                                                          readln(A[i]); for i:=1 to 10 do begin                                                                                  if A[i]=5 then                                                                                                                       writeln(i,' Строка');                                                                                                            end;                                                                                                                              end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика