М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Benito84
Benito84
13.02.2020 10:23 •  Информатика

ОЧЕНЬ Во Где цикл выполнится хотя бы один раз несмотря на условие?
A )for..to..do
B) while..do
C) repeat..until

Во Какой цикл называют циклом с постусловием?
A) for..to..do
B) while..do
c) repeat..until

Во Сколько раз исполнится следующий цикл:

i:=27;
Repeat
i:=i-5
Until i>27;

A)1
B)21
C)5
D)бесконечное число раз

Во Сколько раз исполнится цикл:
i:=2;
while i<12 do
i:=i+4;

A)2
B)3
C)4
D)11

Во Чему будет равна переменная sum после выполнения фрагмента программы:
i:=35;
sum:=0;
While i>5 do begin
sum:=sum+i/5;
i:=i-5
end;

ответ: _

Во Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 3 раза?
i:=1;
while i<=... do begin
writeln('Привет!');
i:=i+1
end;

ответ:_

Во Параметр цикла for..to..do может получить значения…
A)3,7,11,14,19
B)2,3,4,5,6;
C)10,7,4,1,-2

Во Чему будет равна переменная sum после выполнения фрагмента программы:
sum:=0;
for i:=7 to 9 do
sum:=sum+i;

ответ:_

Во Определите, что будет напечатано в результате работы следующей программы.
var s, k:integer;
begin
s:= 10;
for k:= 2 to 12 do
s:= s + 10;
writeln (s);
end.

ответ:_

Во Какое число будет выведено на экран после выполнения этого фрагмента программы?
write(1);
for i:=5 downto 1 do
write(i);

ответ:_

👇
Ответ:
panda044
panda044
13.02.2020

1) B

2)С

3)A

4)A

5)7

6)3

7)B

8) 17 (если не прокатит, то - 24)

9) 110

10) 1

Объяснение: Надеюсь всё верно)

4,7(42 оценок)
Открыть все ответы
Ответ:
daniliwotchesi
daniliwotchesi
13.02.2020
#include <iostream>
using namespace std;
int main() {
        int mat[3][3];
        int k;
        int size=0;
        int * arr=0;
        for(int i=0;i<3;i++){
                for(int j=0;j<3;j++){
                       cin>>mat[i][j];
                          if (mat[i][j]>0){
                             arr=(int*)realloc(arr,sizeof(int)*(++size));
                             arr[size-1]=mat[i][j];
                                             }
                                           }
                                    }
                  for(int i=0;i<size;i++){
                  cout<<arr[i];
                  }
               delete arr;
               cin.get();
               cin.get();
              return 0;
}
4,6(95 оценок)
Ответ:
Polinakovta
Polinakovta
13.02.2020
//PascalABC.Net 3.0, сборка 1064
const
  nn=50;
var
  a:array[1..nn] of integer;
  i,n,imin:integer;
begin
  Write('Введите количество элементов в массиве: '); Read(n);
  Randomize;
  Writeln('Исходный массив');
  imin:=1;
  for i:=1 to n do begin
    a[i]:=Random(51)-25;
    Write(a[i],' ');
    if a[i]<a[imin] then imin:=i;
  end;
  Writeln;
  for i:=imin to n-1 do a[i]:=a[i+1];
  Writeln('Массив-результат');
  for i:=1 to n-1 do Write(a[i],' '); Writeln
end.

Тестовое решение:
Введите количество элементов в массиве: 15
Исходный массив
17 -3 22 18 -13 -5 5 -15 -18 23 17 -2 -20 23 2
Массив-результат
17 -3 22 18 -13 -5 5 -15 -18 23 17 -2 23 2

А это версия для тех, кто думает, что Паскалю пора давно "на свалку":
//PascalABC.Net 3.0, сборка 1064
begin
  var n:=ReadInteger('Введите количество элементов в массиве');
  var a:=SeqRandom(n,-25,25).ToArray();
  Writeln('Исходный массив:',#13#10,a);
  Writeln('Результат:',#13#10,a.Where(x->x<>a.Min));
end.

Тестовое решение:
Введите количество элементов в массиве 15
Исходный массив:
[-10,-15,8,-19,9,21,-22,-11,12,14,2,19,-25,-5,-15]
Результат:
[-10,-15,8,-19,9,21,-22,-11,12,14,2,19,-5,-15]

Можно сравнить понятность кода и его размер как со "школьным" решением, так и с программой на Java, приведенной в предыдущем ответе.
4,4(76 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ