Напишите программу на языке Паскаль, для решения следующей задачи:Для любого четырехзначного вводимого числа найти сумму второй и предпоследней цифры).(Подсказка. Используйте тип данных integer и операции div и mod)
Напишите программу на языке Паскаль, для решения следующей задачи:
Для любого четырехзначного вводимого числа найти сумму второй и предпоследней цифры).
(Подсказка. Используйте тип данных integer и операции div и mod)
Гость
Ответ(ы) на вопрос:
Гостьvar a,b,c,d:integer;
begin
readln(a);
b:=(a div 100)mod 10;
c:=(a mod 100)div 10;
d:=b+c;
writeln(d);
readln;
end.
Гостьvar a,b,c:integer;
begin
read (c);
a:=c div 100; a:=a mod 10;
b:=c div 10; b:=b mod 100;
write(a+b);
end.
Не нашли ответ?
Похожие вопросы