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

Треба зробити на python


Треба зробити на python
Треба зробити на python
Треба зробити на python

Показать ответ
Ответ:
nastu41
nastu41
02.10.2022 03:38
1.
Begin
 Writeln('Привет!');
 Writeln('Меня зовут Саша!');
 Writeln('Я студентка 2-ого курса начального образования!');
 Writeln('Я будущий учитель младших классов...');
end.

2.
var n:Integer;
Begin
 Read(n);
 Writeln('Квадрат =',n*n);
end.

3.
var a:Integer;
Begin
 Read(a);
 Writeln('S = ',a*a);
 Writeln('P = ',4*a);
end.

4. var n:Integer;
   Begin
     Read(n);
     Writeln(n+10);
  end.

5. var a,b:Integer;
   Begin
     Read(a,b);
     Writeln(' S = ',a*b);
     Writeln(' P = ',2*(a+b));
   end.

6. var a,b,c:Integer;
   Begin
     Read(a,b,c);
     Writeln('Сума = ',a+b+c);
   end.
0,0(0 оценок)
Ответ:
vit7201
vit7201
28.04.2022 15:12
Program P1;
var
a: array [1..50] of integer; {Переменная а - одномерный массив в 50 элементов};
S, I : integer; {Переменная S - сумма элементов, I - счетчик цикла} 
begin
randomize; {включаем генератор случайных чисел};
S:=0;   {Обнуляем значение суммы}
for I:=1 to 50 do   {цикл в 50 повторений}
begin
a[i]:=random(201) - 100; {формируем 50 элементов массива случайным образом в интервале [-100;100]}
S:=S+a[i];   {Добавляем каждый элемент к значению суммы}
end;
wrilteln('Сумма всех элементов ', S); {выводим значение суммы}
end;
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота