Напишите программу, которая возводит в квадрат трехзначное число, введённое с клавиатуры, при условии, что в числе содержится цифра 7. если в числе нет цифры 7, то следует вывести число в исходном виде(через оператор if)паскаль
МаксимНелучший
3
25.08.2019 15:40
1
Другие вопросы по теме Информатика
duyquhuseynli11
23.09.2019 19:50
GabriellaKiM
23.09.2019 19:50
Св55
19.11.2020 22:30
РенесмиАгзамова
19.11.2020 22:30
P4k3T
19.05.2019 11:30
shakmatovakseni
09.09.2019 17:40
Диана1Котова
09.09.2019 17:40
Насет2
24.03.2021 10:05
MilаKlimenkova
24.03.2021 10:05
Популярные вопросы
- Сколько раз в жизни плодоносит фасоль...
1 - 22-наурыз – жыл басы, жаңа жыл мерекесі болып саналады. Адамдар...
1 - Какие физические качества необходимы для метания?...
3 - На рисунке BK = 12, CK = 3, AB = 12, MA = 4, AC = 15. Найдите...
2 - Решите систему уравнений x^2-25/y+1=0 1-y^2/x-5=0 В ответе укажите...
3 - ІВ Контрольний твір на тему чи можна і як зарекомендувати себе...
1 - Хелп Выпишите из предложения подлежащее и сказуемое Определите...
3 - Боковая сторона равнобокий трапеции равна 10 см а ее острый...
1 - План Индонезия Географическое положение Столица Рельеф. Полезные...
3 - 1)Выпишите из приведённого списка формулы всех из кислородных...
2
begin
readln(a);
str(a,s);
if (pos('7',s)>0)
then
a:=a*a;
writeln(a);
end.