Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
брат2006кирилл
15.12.2020 05:10 •
Информатика
Какая решается по следующей программе: program test var a, b, c: integer begin readln( a,b) c: =(a+b)×(b-a) writln c
Ответ:
margarita030620
02.10.2020 12:25
Program Test;
var
A, B, C: integer;
begin
writeln('введи 2 числа ');
readln(A,B);
C:=(A+B)*(B-A);
writeln('C=',C);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ридер
11.11.2022 16:33
Укажите строку(-и), в которой(-ых) присутствует(-ют) ошибка(-и). ответ введите в числовом виде, без пробелов, по возрастанию....
radmila85
27.10.2020 16:54
Определите, в какой кодировке записан текст, и расшифруйте. десятичный код: 200 32 205 192 32 209 206 203 205 21419732 197 209 210 32 207223 210 205 192 46...
coffeepro80
20.04.2020 16:15
Программы предназначенные для обеспечения доступа к ресурсам сети интернет....
Максим5955
24.10.2021 16:23
Как настроить звуки в презентации ...
Asyu666
08.05.2023 16:41
Лазерный диск может содержать 640 мегабайт информации определить сколько потребуется диски для копирования информации одного диска если емкость дискеты составляет 1,44 мегабайта...
Rostislav200353
24.09.2020 00:30
Составить таблицу истинности с формулой (p следствие q) следствие (q следствие p)...
OkumRin
22.04.2021 13:47
Як можна зменшити тиск у різних середовищах...
3339991
09.12.2021 14:27
На першій полиці було у 3 рази більше книг ніж на другій після того як з першої полиці взяли 15 книг а на другу положили 11 книг ...
Шист
09.12.2021 14:27
ОПРЕДЕЛИТЕ И ЗАПИШИТЕ ОСНОВНУЮ МЫСЛЬ ТЕКСТА ВПР 8 КЛАСС ...
Алина483329
09.12.2021 14:27
Если можете то решите все до 5 часов вечера разобраться ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
A, B, C: integer;
begin
writeln('введи 2 числа ');
readln(A,B);
C:=(A+B)*(B-A);
writeln('C=',C);
end.