Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
boom1980
03.10.2022 03:14 •
Информатика
Составить программу на паскале и к ней блок схему n=(a+b)^2(b+c)^2(-a-c)^2
Ответ:
Yulia1421
07.10.2020 17:17
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=readinteger3('Введите a,b,c->');
var N:=((a+b)**2)*((b+c)**2)*(-a-c)**2;
Writeln('N=',N);
end.
Как в школе учат ->
var a,b,c:integer; N:real;
begin
Writeln('Введите a,b,c->');
read(a,b,c);
N:=((a+b)**2)*((b+c)**2)*(-a-c)**2;
Writeln('N=',N);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
mrjuck
20.07.2022 09:07
На какие 4 группы делиться интерфейс: 1 )пользовательский 2) 3) 4) пожл...
orudcovamilana
15.01.2023 05:05
1. какие из документов являются первичными? реферат, книга, кинофильм, аннотация на книгу, список , сказка, научная статья....
Евус1111
02.04.2022 11:52
Дана последовательность чисел, оканчивающаяся 0.найти два максимальных элемента заданной последовательности. . заранее .)...
sertarsertar205
26.11.2021 02:08
Антон выложил на столе из карточек слово: абракадабра а затем стал менять местами соседние карточки. какие слова могли у него получиться, если он сделал ровно 5...
bhawk2017
04.05.2023 20:12
1) Процессор выполняет 3*10243 элементарных операций в секунду. Сколько секунд потребуется процессору для обработки 120 Гбайт информации, если за одну элементарную...
Lilic1503ld
26.11.2020 15:53
Почему нашу страну называют многонациональной? Расскажи, что ты знаешь о своем народе, о его быте, обычаях, праздниках....
feterina
26.11.2020 15:53
Выскажем мнение: какое имя принадлежит крестьянину, какое – священнику, какое – чиновнику...
Kovalenko2001N
26.11.2020 15:53
Рассмотрим карту Древнерусского государства 9-11 веков на с.10. Найдем столицу и перечислим города Древнерусского государства. С какими племенами...
Azimov1177
26.11.2020 15:53
Вспомни, почему великие князья Ярослав Мудрый и Владимир Красное Солнышко имели такие прозвища. Почему в народе царя Ивана IV называли Грозным?...
52535701
26.11.2020 15:53
О каких качествах Екатерины Великой говорит это высказывание: «Уже в шесть-семь часов утра императрица была в рабочем кабинете. Целый день...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
//Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=readinteger3('Введите a,b,c->');
var N:=((a+b)**2)*((b+c)**2)*(-a-c)**2;
Writeln('N=',N);
end.
Как в школе учат ->
var a,b,c:integer; N:real;
begin
Writeln('Введите a,b,c->');
read(a,b,c);
N:=((a+b)**2)*((b+c)**2)*(-a-c)**2;
Writeln('N=',N);
end.