В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
lizadyugovskay
lizadyugovskay
10.10.2020 11:48 •  Информатика

Работа на С#. Вычислить если x>0, то √(〖(x+1)〗^ ), иначе если x<=1, то 1/〖(x-2)〗^2 . Должна быть возможность ввода x через консоль.

Показать ответ
Ответ:
Человек2029
Человек2029
16.09.2021 04:24

Переменной a присвоено значение 7. Что будет

выведено на экран монитора в результате выполнения оператора Write(a);

а=7

7

а

Целочисленным переменным a, b, c надо присвоить соответственно значения 15, 22 и 37. Какой оператор ввода соответствует входному потоку 37 22 15?

read (a, b, c);

readln (a, b, c);

read (c, b, a);

write (b, a, c);

Что будет выведено на экран после выполнения следующей программы: var a,s:real; begin a: =3; s: =a*a; writeln('s=', s:3:1); end.

s=9.0

s:=9

9

s=9

С какой команды НЕЛЬЗЯ задать значение переменной a?

С команды присваивания

С команды write(a)

С команды read(a)

Для ввода в оперативную память значений переменных используется оператор

if

write

readln

end

Дан фрагмент программы: s:=414.34394;writeln (s:6:2); После его выполнения на экран будет выведено:

s:=414.34;

414.34394;

414.34;

s:=414.34394;

0,0(0 оценок)
Ответ:
Alina25255
Alina25255
14.11.2021 23:12
1. 

program HelloWorld;

var n:array [1..15] of integer;

var c: integer;

var z,i: SmallInt;

 

begin

 for i:=1 to 15 do

     n[i] := random(1000);

      repeat

 z:=0;

 //сортировка

 for i:=1 to 15 do

     if n[i]> n[i+1] then

        begin  

            c:=n[i];

            n[i]:=n[i+1];

            n[i+1]:=c;

            z:=1;

        end;

    until z=0;

 for i:=1 to 15 do

    writeln(n[i])    

end.


2.

program HelloWorld;

var n:array [1..10,1..7] of integer;

var c: integer;

var z,i: SmallInt;

 

begin

 for i:=1 to 10 do

   for z:=1 to 7 do

     n[i,z] := random(1000);

 

 for i:=1 to 10 do

   for z:=1 to 7 do

   begin

     write('A[',i,',',z,']=');

     writeln(n[i,z]);

   end;

 

 for i:=1 to 10 do

   for z:=1 to 7 do

   begin

     if i = 5 then

       begin

         c := n[5,z];

         n[5,z] := n[7,z];

         n[7,z] := c;

        end;

   end;

 

writeln('');

 

 for i:=1 to 10 do

   for z:=1 to 7 do

   begin

     write('A[',i,',',z,']=');

     writeln(n[i,z]);

   end;

    

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота