Вопрос школьника по предмету Информатика
Дан двумерный массив целых чисел. Вывести все строки, состоящие только из чисел одного знака в обратном порядке. На Pascal ABC.net
Ответ учителя по предмету Информатика
//PascalABC.Net 3.2
begin
var a: array of array of integer;
var n:=readinteger(‘Кол-во строк: ‘);
var m:=readinteger(‘Кол-во столбцов: ‘);
setLength (a, n);
for var i:=0 to n-1 do a[i]:=ReadArrInteger(‘Вводите строку: ‘, m);
for var i:=0 to n-1 do
if a[i].min*a[i].max>0 then a[i].Reverse.Println;
end.
Похожие вопросы от пользователей
до города за 3 часа . А обратный путь 2часа 15минут . Скорость течения реки 4км/ч.
Какова собственная скорость лодки.
1.Совсем непросто приучать диких животных, но иих можно приучить.2Мне приходилось встречать зимой зайцев, но ещо не удалось встрететь лисицу. 3 Надо отмечать праздники. Завтра нужно отметить праздник.
1. «You should go to bed.» – advise – He advised me to go to bed.
2. «Please, please don’t leave me.»
3. «Do it now!»
4. «No, I did not kill him.»
5. «Oh, alright. I’ll do the washing-up.»
6. «Don’t forget to take the dog out.»
7. «Everybody, stand up now!»
8. «No, I will not give you my money.»
9. «Could I use your phone?»
10. «I’m sorry I shouted at you.»