tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Разработать программу на языке
Разработать программу на языке паскаль для ввода 2-х целых чисел а и b и вычисления их среднего арифметического с.
HunterX05
3 16.09.2019 07:00
0
Ответы
Лис2002Лис
01.09.2020 15:51
// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadInteger2('Введите два числа через пробел:');
var c:=(a+b)/2;
Writeln('Их среднее арифметическое равно ',c)
end.
ПОКАЗАТЬ ОТВЕТЫ
FruitAPps
01.09.2020 15:51
var
a,b:integer;
begin
Writeln('Введите 2 числа');
Readln(a,b);
Writeln('Среднее арифметическое этих чисел -> ', (a + b)/2);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
rortat32
25.09.2019 04:30
Даны три действительных числа. выбрать из них те, которые принадлежат интервалу (1,3) нужна блок схема...
polinamypp
25.09.2019 04:30
Html является: а) средством просмотра web-страниц б) транслятором языка программирования в) языком разметки web-страниц г)сервером интернет...
vasx
25.09.2019 04:30
Как записать это логическое выражение в екселе? x=(a+c+! b)*(a+b*! c)...
mariaponomarev1
25.09.2019 04:20
Вводиться n, вывести (n! +2) блок схему и программу на паскаль....
XxxJEKxxX
25.09.2019 04:20
Школьные знания.com задай вопрос из школьного предмета 5 - 9 классыинформатика 5+3 б 25 1)как можно описать на паскале массив,в котором будет храниться значения численности населения...
колдун3
25.09.2019 04:20
Имеются четыре произвольных числа a, b, c, d. программа должна произвести проверку утверждения (ответить да/нет): среди чисел нет равных. .....
FfffdZb
25.09.2019 04:20
Нужно расписать на языке паскаль определите значение переменной b после выполнения данного алгоритма: a : = 4 b : = 10 a : = b-a*2 b : = 24/a*4 в ответе укажите одно целое число– значение...
Tittans7
25.09.2019 04:20
Алфавит состоит из 100 символов. какое кол-во информации несет один символ?...
struk20022298
25.09.2019 04:20
Написать программу рисования пяти букв в програме кумир...
dina08254
25.09.2019 04:20
Количество синтаксических ошибок в операторе if(a b and b c) then max: =a; else a: =b; равно...
Популярные вопросы
До іть ів. Заповніть таблицю Український світ в Енеїді...
3
Для каких двух из перечисленных стран характерна наибольшая площадь горного оледенения?...
2
Напиши есе про те, як хімія допомагає сучасній людині покращувати життя. Об єм -...
3
ответить на вопросы: каковы особенности строения кольчатых червей? что такое параподии?...
3
Знайди відношення 2см до 1дм...
2
Автомобиль и автобус выехали из двух городов, находящихся на расстоянии 940 км,...
3
устоновіть хронологічну послідовність Заснування князем Д. Вишневецьким на о. Мала...
3
Якщо розтопити парафін утворилися нова речовина? яке це явище?...
3
1. До складу біологічних мембран входять: A) ліпіди та білки; Б) ліпіди та вуглеводи;...
3
Озаглавте текст. Сколько героев рассказа и кто они? Сколько пластов времени раскрыто...
1
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadInteger2('Введите два числа через пробел:');
var c:=(a+b)/2;
Writeln('Их среднее арифметическое равно ',c)
end.
a,b:integer;
begin
Writeln('Введите 2 числа');
Readln(a,b);
Writeln('Среднее арифметическое этих чисел -> ', (a + b)/2);
end.