Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
lizarepkina2004
23.04.2022 02:39 •
Информатика
Даны натуральные числа а, n. вычислить a(a-n)(a--n*n). через паскаль
Ответ:
dddimkaplay
02.10.2020 05:30
Program info;
var a,n,o:integer;
begin
read(a,n);
s:=a*(a-n)*(a-2n)*(a-n*n);
writeln(s);
end.
Вот и всё
0,0
(0 оценок)
Популярные вопросы: Информатика
Lubafili2017
21.04.2021 08:17
В архiваторi WinRAR заaрхiвiрувати три файли та порiвняти ïх вихiдний розмiр з заархiрованим. Занести данi у таблицю...
Danusja13
23.01.2022 07:20
Василько взяв великого циркуля та зайшов до кімнати, підлога якої являє собою квадрат зі стороною рівною M. Поставивши циркуль на перетині діагоналей цього квадрата він почав...
tisha199567
05.11.2021 01:04
Paint.NET поддерживает эти форматы (3 правильных ответа): 1.PNG2.JPEG3.GIF4.DOC...
школа5553
17.02.2021 05:15
у меня сор по информатике...
Мандер
02.04.2021 14:27
2. Известны значения элементов целочисленного массива а ia[i]1.12.53.-34.25.-46.107.48.оЗапишите значения последних пяти элементов массива b, сформированного следующимобразом:for...
dasha43com
23.07.2021 11:29
Вариант 5. 1. Запишите значения элементов массива, сформированного следующим образом:а). for i:=1 to 8 do a[i]:=i*5;1.2.3.4.5.6.7.іa[i]8.б). ). for i:=1 to 8 doif i mod 2=0...
Aryzhaн
06.11.2020 00:38
мне ответить правильно на вопрос...
katarakta
23.03.2022 08:47
| Соотнеси картинку с растровым иливекторным изображениемРастровоеизображениеВекторноеизображение...
891447819danilDanil
15.10.2020 02:29
Назови различие между объекты 2D модели и объектом 3D модели...
Дженнифер878
22.12.2022 00:18
Соотнеси картинку с растровым иливекторным изображением...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,n,o:integer;
begin
read(a,n);
s:=a*(a-n)*(a-2n)*(a-n*n);
writeln(s);
end.
Вот и всё