Равна ли сумма первых двух цифр четырехзначного числа сумме двух последних цифр

@Vad1k · Регистрация: 25.09.2012

Студворк — интернет-сервис помощи студентам

Ввести с клавиатуры четырехзначное число и определить, равна ли сумма первых двух цифр сумме двух последних цифр.

@CodeR · 28.09.2012, 14:58

Pascal

Var n:longint;
Begin
    write('Введите 4-ое число: ');readln(n);
    writeln((n div 1000+n div 100 mod 10)=(n div 10 mod 10+n mod 10));
    readln;
End.

@Vad1k 0 / 0 / 1 Регистрация: 25.09.2012 Сообщений: 191
		1
	Равна ли сумма первых двух цифр четырехзначного числа сумме двух последних цифр 28.09.2012, 14:52. Показов 3877. Ответов 1 Метки нет (Все метки) Ввести с клавиатуры четырехзначное число и определить, равна ли сумма первых двух цифр сумме двух последних цифр. 0

Опции темы

Равна ли сумма первых двух цифр четырехзначного числа сумме двух последних цифр

Решение