Присвоить переменной A1значение 25, переменной А2 значение 20. Поменять значения переменных местами. Вычислить значение переменной А3=А1-А2.
Сашуля12345
1
25.10.2020 18:44
1
Другие вопросы по теме Информатика
Анюточка2906
17.05.2019 14:10
стася106
20.02.2020 08:11
KseniaRogalina
20.02.2020 08:03
ksenichchka
21.06.2019 11:20
Ксения222332
21.06.2019 11:20
younightmare
16.12.2020 23:31
annyakristina
16.12.2020 23:31
Zubkub
16.12.2020 23:31
nastyakarmazina1
16.12.2020 23:31
Популярные вопросы
- Найти все первообразные данной функции: 1) f(x)=x^6+3x^2 (Х в шестой степени плюс...
3 - До ть це все нада рішити а не абгд...
2 - история 6 класс отет должен быть в виде цифр 5.После взятия Гранады на территории...
3 - Коли народився В.Головобородько...
3 - 1. Объясните, что составляло основу экономического проветания 2. Кого в Англии называли...
1 - Что из перечисленного не входит в число характерных для лирики Н.С. Гумилёва тем?...
2 - 1 из 1 Последствия Черного мора.Задание: прочитайте текст, заполните таблицу: Экономические...
1 - Вопросы о интернете ответами на английском.быстрее...
1 - 1.Вода тече по трубі діаметром 6 см зі швидкістю 0,4 м/с, а потім проходить по трубі...
3 - Какая сила тяжести действует на железный брусок размером 15 x 4,5 x 2,5 см...
3
Первое действие:
А1 = 25
А2 = 20
Второе действие:
А1 = 20
А2 = 25
Третье дествие:
А3 = А1 - А2
А3 = 20 - 25 = -5
var
A1,A2,A3: Integer;
begin
A1 := 25;
A2 := 20;
A1 := A1 +A2;
A2 := A2 - A1;
A2 := -A2;
A1 := A1 - A2;
A3 := A1 - A2;
writeln(A3)
end.