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

Перевести на Пайтон var x,y:intrger;

begin

readln(x);

if x>0 then

y:=x+100

else if x=0 then
y:=20
else if x<0 then

y:sqr(x);

writeln(y);
end.​

👇
Ответ:
marmeladka0907
marmeladka0907
23.04.2020

x = int(input())

if x > 0:

   y = x + 100

elif x == 0:

    y = 20

elif x <0:

   y = x**x

print(y)

Объяснение:

4,4(76 оценок)
Открыть все ответы
Ответ:
vehera087
vehera087
23.04.2020

begin

 var n:=ReadInteger ('Количество строк в массиве:');

 var m:=ReadInteger ('Количество столбцов в массиве:');

 Writeln ('*** Исходный массив [',n,',',m,'] ***');

 var a:=MatrRandom (n,m,-99,99);

 a.Println(4); Writeln (4*a.ColCount*'-');

 Writeln ('Кол-во положительных: ',a.ElementsByRow.Where(x->x>1).Count)

end.

Пример

Количество строк в массиве: 5

Количество столбцов в массиве: 12

*** Исходный массив [5,12] ***

-64  16  -1  59 -63 -37 -54  28 -40  39  17 -84

 89   8  38  56 -51  20  49  28 -90 -85   1  81

 13  52 -10  15  28 -95  76 -77 -54 -27  33  -9

 22  43 -40  14  58  19 -75  26  92  94 -59  87

-95  -8  65 -24 -50  62  26 -79 -85  18 -54 -16

Кол-во положительных: 32

4,7(30 оценок)
Ответ:
orehskonastia
orehskonastia
23.04.2020

uses GraphABC;

begin

SetWindowWidth(800);     //ширина окна программы

SetWindowHeight(600);    //высота окна программы

SetPenWidth(5);          //толщина пера

setpencolor(clblue);

Rectangle(1, 600, 200,450);

Rectangle(150, 300, 200,450);

Line(1, 450, 150,450);

Line(150,450, 75,150);

Line(75,150, 1, 450 );

Line(200, 197, 400,197);

Line(400, 197, 300,107);

Line(300, 107, 200,197);

Rectangle(200, 600, 400,200); //дом

Rectangle(400, 600, 600,450); //дом

Rectangle(450, 300, 400,450); //дом

Line(447, 447, 600,447);

Line(600,447, 520,150);

Line(520,150, 447, 447);

Circle(300,300,50);

Circle(520,130,25);

Circle(75,130,25);

end.

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