Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
nbatagova2005
07.04.2020 17:14 •
Информатика
Напишите программу ввода трехнапишите программу ввода трех величин (а,в,с) на одной строке,рассчитайте и выдайте на экран на отдельной строке значение выражения: ав/3,14 + 3c с информатикой беда, буду )
👇
Увидеть ответ
Ответ:
Vasilina88
07.04.2020
Var A,B,C,D: real;beginread(A, B, C);D:=A*B/3.14 + 3*C;writeln (D)end.
Вот вставляй значения и решай если надо
4,4
(4 оценок)
Открыть все ответы
Ответ:
ilyaneizvestno10
07.04.2020
// PascalABC.Net 3.2
begin
var a:=ArrRandom(15,10,30).Select(x->x+0.1); Write('A='); a.Println;
var b:=ArrRandom(12,10,30).Select(x->x+0.1); Write('B='); b.Println;
var c:=a.Intersect(b).ToArray;
Write('C='); c.Println;
a:=a.Except(c).ToArray; Write('A новый='); a.Println;
b:=b.Except(c).ToArray; Write('B новый='); b.Println
end.
Пример решения
A=15.1 25.1 29.1 24.1 16.1 29.1 18.1 13.1 10.1 12.1 10.1 13.1 14.1 18.1 24.1
B=24.1 10.1 23.1 15.1 13.1 16.1 22.1 21.1 21.1 28.1 26.1 29.1
C=15.1 29.1 24.1 16.1 13.1 10.1
A новый=25.1 18.1 12.1 14.1
B новый=23.1 22.1 21.1 28.1 26.1
4,4
(64 оценок)
Ответ:
kuanyshqz
07.04.2020
Это ? pascalвыделить код1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 uses graphabc; function f(x: real): real; begin f: =sin(x)/x end; var mx,my,x,dx,y: real; x0,y0,i: integer; s: string; begin x0: =windowwidth div 2; {г*г*г·г*г«г® гєг®г®г°г¤гёг*г*гі гў г¶гґг*гіг°гґ гѕгєг°г*г*г*} y0: =windowheight div 2; {гєг®гѕгґгґгёг¶гёгґг*гіг» гїг® г®г±гїг¬ г¤г«гї гїгґг°гґгўг®г¤г* г°гґг*г«гјг*г»гµ гєг®г®г°г¤гёг*г*гі гў гѕгєг°г*г*г*г»гґ} mx: =30; my: =100; line(0,y0,windowwidth,y0); {г®г±гј г•} line(x0,windowheight,x0,0); {г®г±гј г“} {гїг®г¤гїгёг±гё г®г±гё y} line(x0-3,y0-round(my),x0+3,y0-round(my)); textout(x0-10,y0-round(my)-15,'1'); line(x0-3,y0+round(my),x0+3,y0+round(my)); textout(x0-15,y0+round(my),'-1'); {гїг®г¤г°гёг±гё г®г±гё г•} for i: =1 to 6 do {г¬г*гєг±гёг¬г*г«гјг*г®гґ гєг®г«гёг·гґг±гігўг® г§г*г±гґг·гґгє гў г®г¤г*гі г±гіг®г°г®г*гі} begin line(x0+round(i*pi*mx/2),y0-3,x0+round(i*pi*mx/2),y0+3); {г§г*г±гґг·гєгё г*г* г®г±гё г•} line(x0-round(i*pi*mx/2),y0-3,x0-round(i*pi*mx/2),y0+3); if i mod 2=0 then {гїг®г¤гїгёг±гё г·гґг°гґг§ 1} begin str(i div 2,s); if s='1' then s: =''; {1pi 1 г*гґ гїгёгёгґг¬} textout(x0+round(i*pi*mx/2),y0+10,s+'pi'); textout(x0-round(i*pi*mx/2),y0+10,'-'+s+'pi'); end; end; {г¶гґг*гіг°} textout(x0+5,y0+10,'0'); {гїг®г¤гїгёг±гё гєг®г*г¶г®гў г®г±гґг©} textout(windowwidth-10,y0-10,'x'); textout(x0-10,10, 'y'); dx: =0.001; {гјг°г*гґгёгє} x: =-3*pi; while x< =3*pi do begin setpixel(x0+round(x*mx),y0-round(f(x)*my),clblue); {гјг°г*гґгёгє г±гёг*гёг¬} x: =x+dx; {г*г*г°г*г№гёгўг*гґг¬ гµ} end; end.
4,5
(90 оценок)
Это интересно:
Д
Дом-и-сад
21.11.2022
Как подрезать азалию: правила и рекомендации...
З
Здоровье
15.05.2021
Как распознать мошоночную грыжу...
П
Питомцы-и-животные
24.05.2020
Как спасти кошку, которая забралась на дерево?...
П
Питомцы-и-животные
13.09.2020
Как вырастить карпа кои: основные правила и советы...
П
Питомцы-и-животные
15.06.2022
Как производить убой крупного рогатого скота...
П
Путешествия
10.10.2021
Как собраться в деловую поездку: советы для эффективной подготовки...
З
Здоровье
30.08.2020
Как предотвратить простуду на коже (герпес)...
И
Искусство-и-развлечения
20.03.2022
Как вставить трость в кларнет: научитесь быстро и легко...
21.03.2023
6 советов, как быть счастливым в жизни...
О
Образование-и-коммуникации
13.02.2021
Как написать комментарий: руководство по созданию качественных комментариев...
Новые ответы от MOGZ: Информатика
bayan6
04.02.2023
Решить программу на языке ! только примерно по примеру заранее !...
nika344245335
01.11.2021
Сделать программу на pascal. сильно нужно, заранее !...
Папинадочка111
17.02.2022
Python. введи строку s и число повторений строки n. выведи строку n раз с цикла. python...
rafik14
22.09.2021
Написать программу в ! ! , заранее...
DENZYSUPER
10.01.2020
Нужна хотя бы стартовая с проектом, данные как и что делать, если есть - скелет проекта, с темами и их описанием. вообщем я обычный хорошист (ну или хотя бы старался...
помогите1170
26.11.2022
Таня нашла старый калькулятор со стертыми клавишами операций сложения,вычитания,умножения, и деления (столбец d). последовательно набрав b2 a2 d4 a3 c2 c4 она получила...
Vlada12092009
26.11.2022
Загатка про огонь хороший ответ должен быть не большой но нормальный...
sabina9262
20.04.2020
Информатика факториальная система десятичная 2121f 2201f 2220f 3020f 3211f из десятичной в факториальную 91 67 84 50 69 из системы фибоначчиева в десятичную 10100fib...
Киска11102844
27.01.2022
Дана последовательность из n действительных чисел.найти порядковый номер и само число,которое наиболее близко к заданному числу. (можно написать программку на паскале)...
zvarichevgenija
12.12.2020
75 , информатика, 9 класс, кто не знает не ! 1) заполнить массив из 30 целых чисел случайными числами в интервале от [0; 200) и подсчитать количество нечетных элементов!...
MOGZ ответил
Математика 6 класс мерзляк...
B первый день - 21 человек Во второй день - ?, в 3 раза больше...
правильная пирамида, AC=MC=2корень 3 Найти:V...
Как вшп соединял восток и запад? Эссе 10 предложений 3 доказательства...
Дан треугольник ABC, AB=2√3 см, AC= 4 см, синус острого угла...
Записать получившие фразы с переводом и составить из данных фраз...
Знайдіть двоцифрове число, яке а 7 разів більше від суми його...
Чому Грей так довго і прискипливо вибирав відтінок кольору шовку...
Как разложить на множители многочлен : x2(в квадрате) X2 - 12X...
Задание 7 Вырази в указанных единицах измерения. 123 м² = см²...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
Вот вставляй значения и решай если надо