Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
sirius42295
26.02.2023 10:47 •
Информатика
Pascal abc. составьте программу для нахождения массовой доли вещества в растворе. масса растворенного вещества m₁ и общая масса раствора m вводятся с клавиатуры. указание массовая доля вещества в растворе вычесляется по формуле: ω=m₁/m
Ответ:
volapaevowjb4p
03.10.2020 07:52
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
var m,m1:real;
Write('Введите через пробел m, m1 ->'); Read(m,m1);
Writeln('w=',m1/m)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
NurlG
12.07.2022 05:02
Можно спросить ? почему я не могу задать вопрос на тему название игры ? ? мне его всё время удаляют, объясните почему ! заранее...
СакураХаруно17
17.01.2021 19:42
Влокальной сети колледжа находятся компьютеры (включенные и не включенные). среди них – 2 не включенных. сообщение о том, наугад выбранный компьютер окажется не включенным,...
aodemidov
17.01.2021 19:42
Разница между форматированием и редактированием ....
aydinlileman7
06.01.2021 00:22
Как из формата: файл, сделать формат: база данных (.db) ?...
2000120
03.01.2023 18:13
Что выдаст программа, если ввести следующие числа 4 12 14 15 24 program m1; var i,n,a,min:integer; begin readln(n); min:=30000; for i:=1 to n do begin readln(a); if (a mod...
alievvusal57vusal
31.08.2020 07:55
Дана программа: Program Primer; Var A,result : real; Begin Writeln( Введите значения переменной A ); Write( A= ); Readln(A); Result := sqr((9+A)*10); Writeln ( sqr((9+A)*10)...
ерен1
07.02.2021 08:37
Какой символ служит символом-разделителем в программе: a) : b) { c) [ d) ;...
LapaVay
12.04.2021 03:11
Решить задачи на паскале 1. С клавиатуры вводится пользователем n различных чисел. Подсчитать и вывести на экран количество отрицательных из них. 2. Вводится n чисел. Найти...
Kroo66944
23.01.2023 05:08
Составьте программу построения 10 концентрических окружностей с центрами в точке (200,100) и радиусами 10, 20...100...
grantmarkaryan
03.01.2021 09:50
206 · 153 н ы 39 810 + 5 940 и 8 481 – 1 293 х 809 · 706 л 729 659 – 8 324 ! 375 · 24 к 262 – 186 е 32 136 : 618 в 31 800 : 300 с 197 209 : 199 л 612 · 752 у 458 607 – 446...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var m,m1:real;
Write('Введите через пробел m, m1 ->'); Read(m,m1);
Writeln('w=',m1/m)
end.