Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Digger2001
01.04.2023 12:39 •
Информатика
Написать программу на языке pascal. найти значение выражения для заданного x. 1.1. 2x+5; 1.2. 3x^2+1x+7; 1.3. 3x+7; 1.4. 2x^2+7+10 знак ^ обозначает степень числа, а в паскале записывается как sqr(x), где x переменная.
Показать ответ
Ответ:
ариариииирпа
17.07.2020 21:52
Var x:integer;
begin
x:= ;//Сюда ввести значение.
writeln(2*x+5);
writeln(3*Sqr(x)+1*x+7);
writeln(3*x+7);
writeln(2*sqr(x)+7+10);
end.
С вводом X:
var x:integer;
begin
writeln('Введите x: ');
readln(x);
writeln(2*x+5);
writeln(3*Sqr(x)+1*x+7);
writeln(3*x+7);
writeln(2*sqr(x)+7+10);
end.
0,0
(0 оценок)
Ответ:
Нznm
17.07.2020 21:52
Var
x,i,a1,a2,a3,a4:integer;
Begin
readln(x);
a1:=2*x+5;
a2:=3*sqr(x)+x+7;
a3:=3*x+7;
a4:=2*sqr(x)+7+10;
writeln(a1);
writeln(a2);
writeln(a3);
writeln(a4);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ler4ic004
19.05.2020 20:54
Программа нахождения произведения всех элементов b(6)...
Makar198043
27.03.2023 23:01
Пять учеников посадили в школьном саду 8 кустов сирени,каждая девочка посадила по 1 кусту сирени, а каждый мальчик-по 2 куста,сколько было мальчиков и сколько девочек?...
Linka00128
17.05.2022 13:52
При открытии документа с диска пользователь должен указать * а) размер файла б) тип файла в) дату создания файла г) имя файла...
Jamalove
04.02.2022 08:22
Проверить, есть ли в четырехзначном числе одинаковые цифры...
sanik98
15.06.2021 22:44
Определите отношения между понятиями и изобразите эти отношения с кругов : береза, липа, дерево, сирень...
okhotnikoffzhep08lws
13.09.2022 05:09
зачеркните неправильный ответ(истина,ложь): 1 (9 5) and (7 4) истина ложь 2 (7 9) and (1 7) истина ложь 3 (6 9) or (10 9) истина ложь 4 (7 6) or (4 3) истина ложь...
Ник555555551
10.10.2022 00:00
Сколько знаков содержит сообщение, закодированное двоичным кодом 1101001100011100110100110001110001010111?...
annmslna2044
19.05.2021 12:07
сканируется цветное изображение размером 10х15 см. разрешающая сканера -600 х 600dpi, глубина цвета - 3 байта. какой информационный объем будет иметь полученный графический...
Morenova123456
07.08.2022 03:18
Составить программы в паскаль. 1. заполнить массив случайными числами из интервала от 0 до 50 и вывести его на экран. найти сумму его четных элементов. 2. заполнить...
del9832
18.07.2021 00:01
Я не понимаю почему нельзя надают на кнопку «далее...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
x:= ;//Сюда ввести значение.
writeln(2*x+5);
writeln(3*Sqr(x)+1*x+7);
writeln(3*x+7);
writeln(2*sqr(x)+7+10);
end.
С вводом X:
var x:integer;
begin
writeln('Введите x: ');
readln(x);
writeln(2*x+5);
writeln(3*Sqr(x)+1*x+7);
writeln(3*x+7);
writeln(2*sqr(x)+7+10);
end.
x,i,a1,a2,a3,a4:integer;
Begin
readln(x);
a1:=2*x+5;
a2:=3*sqr(x)+x+7;
a3:=3*x+7;
a4:=2*sqr(x)+7+10;
writeln(a1);
writeln(a2);
writeln(a3);
writeln(a4);
End.