Найти все трех значные числа где сумма первого и второго равна третьей В ПАСКАЛЕ СДЕЛАТЬ !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
ДЕЛАТЬ !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Ответы:
14-12-2018 06:53
Program zadanie;Var a,b,c,i:integer;Begin For i:=100 To 999 Do begin a:=i div 100; b:=(i div 10) mod 10; c:=(i mod 100) mod 10; If (a+b)=c Then Writeln(i); end;End.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Найти все трех значные числа где сумма первого и второго равна третьей В ПАСКАЛЕ С» от пользователя Азамат Некрасов в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!