1. Информатика
  2. Составьте программу в авс

Составьте программу в авс паскаль, которая осуществляет ввод двух целых чисел с клавы и вывод на экран монитора значения их суммы увеличенной в 7 раз. текст программы скопируйте !

Пони0с0радушкой Пони0с0радушкой    1   01.06.2019 22:40    2

Ответы
Ізабель Ізабель  01.10.2020 16:44
Var s,a,b:integer;
begin
read(a,b);
s:=(a+b)*7;
write(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ЖекаБРО16 ЖекаБРО16  30.10.2019 10:36
Написать программу для чертежника. может кто то делал и знает как, подскажите как ​...
alenayugova26Alena alenayugova26Alena  30.10.2019 10:48
Составить программу для вычисления площади боковой поверхности цилиндра s = 2п r h (qbasik) !...
Ева2208 Ева2208  30.10.2019 10:57
Определить, являются ли два логических высказывания x и y эквивалентными...
Lena121618 Lena121618  30.10.2019 10:58
Вычислить значение целевой функции z(x^*) для линейного программирования \left\{\begin{array}{c}\max z=\max(6x_1+x_2)\hfill\cr x_1+x_2\leq5\hfill\cr x_1\leq2\hfill\cr x_1, x_2\geq0\hfill\end{array}\right....
Varvaralikhtsr1 Varvaralikhtsr1  30.10.2019 10:58
Логическое выражение, используя законы равносильных преобразования....
gogolevap1 gogolevap1  19.11.2020 13:14
Программирование в VBA Робот может перемещаться в четырех направлениях( n- север, w - запад, s - юг, e - восток) и принимать пять цифровых команд : 0 - остановка, 1 - продолжать...
Pizetiv4ik Pizetiv4ik  26.04.2020 21:53
Объясните каждый блок что значит, сама задача: Определить, равен ли квадрат заданного трехзначного числа кубу суммы цифр этого числа....
6755175 6755175  26.04.2020 21:53
Укажите примеры неформальных исполнителей в предложенных ситуациях. Автомат на конвейере наполняет бутылки лимонадом. Компьютер выполняет программу проверки правописания. Симфонический...
Cricetinae Cricetinae  26.04.2020 21:53
Информатика ответьте хоть на что-то, уже будет!​...
Urinasonya Urinasonya  26.04.2020 21:53
Выберите, что выведет на экран данный фрагмент программы.x:=150;n:=x div 10;x:=x-n;if (x mod 5 = 0) and (n mod 5 0) then writeln (x) else writeln(n);​...

Популярные вопросы