tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны две переменные
Даны две переменные целого типа: a и b. если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. вывести новые значения переменных a и b.
DarknEssDk11
3 19.06.2019 00:30
2
Ответы
Slavkamyroslavka
15.07.2020 12:46
Var a,b,c:integer;
begin
readln(a,b);
if a<>b then
begin
c:=a+b;
a:=c;
b:=c;
end
else begin
a:=0;
b:=0;
end;
writeln('a=',a,' b=',b);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
askerovaa1
14.07.2019 18:20
Паскаль: написать программу для определения в двумерном массиве целых чисел d[6,6] максимальный элемент под главной диагональю. оформить ввод/вывод массива....
Kulkovadarya97
14.07.2019 18:20
На паскале написать программу и составить блок схему для определения максимального значения функции w(y)=sin(y)-cos(y+2) если переменная y меняется в интервале (2; 4) (в...
valeriyanikiti
13.05.2020 09:19
Тапсырмалар1. Сәйкестігін тауып, сызықтармен көрсетСпрайт| Кейіпкер бірнеше секундбойы «ойла» тұрады.генето се- есе күндНысанның қозғалысы,өзгерісіАшманяКейіпкер, эльф.дуна...
lerailina30040
13.05.2020 09:19
Написать программы на языке программирования Паскаль. 1. Поменять местами содержимое двух переменных S и T.2. Найти корни квадратного уравнения ax^2+bx+c=03. Найти сумму...
Verenea
13.05.2020 09:19
Құрал-саймандарлың атауын жазыңыз Sketchup құрал саймандары : басу/ тарту , менің артымнан жүр,Контур, таңдау,өшіргіштер,доға,Палитра,сахнаның көрінісін айналлыру ,Лупа,Сызық...
roman5555554
13.05.2020 09:19
МОЛЯЮ В кодировке КОИ-8 каждый символколируется 8 битами. Сапа написал текст(в нем нет лишних пробело)«Чал, Куба, Катар, Швеция, Эстония, Танания.Сальвадор - страны».АУченик...
Даша1000000000000p
13.05.2020 09:19
Напишите название панели инструментов(нужно все 9)...
foxtrot2910
13.05.2020 09:19
Как скачать песни на флешку...
81810000
13.05.2020 09:19
нужно перевести в двоичную, восьмеричную и шестнадцатиричную...
lexa3678
29.04.2020 11:14
Задан IP адрес компьютера и маска подсети. Определите номер компьютера в этой сети. 10.59.35.44 255.255.255.248 ответ точно не 8!...
Популярные вопросы
Подберите синонимы к слову станок кроме слово машина три – четыре синонима...
1
По биологии 7 класс какие особенности внешнего строения имеют рептилии...
1
Много составьте связный текст(10-12 предложений), используя эти словосочетания:...
2
Предложения с обращениями из сказки о мертвой царевне и о семи богатырях...
1
Пункта конец крестовых походов на восток и их последствия...
3
По написать сочинение про болезнь. заранее ....
3
Написать анализ стихотворения лермонтова синие горы кавказа 8 класс...
1
Какое растение – хищник, растет на торфяных болотах?...
2
Дайте определение платформы как структуры земной коры...
3
Розкрити зміст прислів я був би сад, а солов ї прилетять....
2
begin
readln(a,b);
if a<>b then
begin
c:=a+b;
a:=c;
b:=c;
end
else begin
a:=0;
b:=0;
end;
writeln('a=',a,' b=',b);
end.