Даны две переменные целого типа: a и b. если их значения не равны, то присвоить каждой переменной большее из этих значений, а если равны, то присвоить переменным нулевые значения. вывести новые значения переменных a и b.
242
271
Ответы на вопрос:
prograbid(большее из 2-х чисел);
var a,b,c: integer;
begin
readln(a,b);
if a> b
then c: = a
else c: =b;
writeln(c);
end
Популярно: Информатика
-
esaloverzhan15.11.2022 11:22
-
CherryyLou24.07.2021 03:56
-
Nika152Vika23.06.2022 13:06
-
danayamirnaya26.05.2023 01:59
-
Tet4ip06y22.06.2021 22:13
-
Aly600016.02.2023 19:31
-
321Shark30.06.2020 12:36
-
GardenBrid07.08.2021 11:25
-
носок45501.08.2022 10:16
-
Ааа567812.07.2021 04:53