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

Практическая работа
1.Необходимо спроектировать, протестировать и разработать систему, соответствующую нижеописанному сценарию. Любая написанная программа должна включать подсказку для ввода данных, сообщение об ошибке и другую необходимую введённую ясную и понятную информацию.
Имеется квадратный лист картона со стороной a, равной 20 см. Из листа по углам вырезают четыре квадрата и склеивают коробку по сторонам вырезов. Создать проект, который позволяет рассчитать зависимость объёма квадратной коробки от стороны вырезаемого квадрата b, чтобы коробка имела наибольшую вместимость? Длина выреза b меняется от 1 см до 10 см:
v= 〖(a-2*b)〗^(2 )*b
1. Опишите модель решения поставленной задачи, соблюдая следующие пункты:
Название

Описание
Ввод данных

Вывод результатов

Вид алгоритма

2. Составьте псевдокод для решения задачи. Найдите сумму чисел i от 2 до 20 с шагом=3 (i=i+3). Для суммы определите переменную S


Практическая работа 1.Необходимо спроектировать, протестировать и разработать систему, соответствующ

Показать ответ
Ответ:
Alinochka1mimimi
Alinochka1mimimi
25.05.2020 00:29

Задача 1

Program Zadanie1;

var i,N:integer;

A:array[1..4]of integer;

Begin

readln(n);

A[1]:=round(int(N/1000));

A[2]:=round(int(N/100))-A[1];

A[3]:=round(int(N/10))-A[1]-A[2];

A[4]:=N-A[1]-A[2]-A[3];

if (A[1]:=A[4]) and (A[2]:=A[3]) and (A[3]:=A[2]) and (A[4]=A[1]) then writeln('полином');

end;

 

Задача 2

Program Zadanie2;

var i,N:integer;

A:array[1..3]of integer;

 

function Kub(a):integer;begin Kub:=a*a*a;end;

 

Begin

readln(n);

A[1]:=round(int(N/1000));

A[2]:=round(int(N/100))-A[1];

A[3]:=N-A[1]-A[2]-A[3];

if N*N=kub(A[1])+kub(A[2])+kub(A[3]) then writeln('равенство');

end;

0,0(0 оценок)
Ответ:
yuikire
yuikire
01.11.2020 17:00

ответ:

объяснение:

 

1.

вам повезло! египтолог отправляется исследовать несколько храмов в египет, а вас берёт своим . посетите храм и гробницу и подготовьте отчёт о религиозных верованиях египтян этого периода.

а) каких богов вы увидели в храме и гробнице? (укажите не менее 7-ми) составьте таблицу: имя бога/чему покровительствовал.

б) какие священные животные вам встретились? (укажите не менее 4-х) как вы думаете, почему они почитались?

свои рассуждения можете подкрепить фотографиями (скриншотами) из экспедиции.

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