Помогите, пожалуйста! Создать программу Паскаль возведение в квадрат чисел оканчивающихся на 5пожалуйста!
Числа вводятся или как? Напишите подробнее
да, когда у меня выйдет " окно вывода" я должна ввести число например 5 и должно следом выйти 25
вообще,нам сначала дали алгоритм и из него уже надо программу
Держи:
program abc;
var
a:int64;
Begin
readLn(a);
if (a mod 5 = 0) and (a mod 10 <> 0) then
a:= a*a;
writeLn(a);
End
else writeLn('Это число не оканчивается на 5');
End.
Спасибо огромное, спасли меня!
Обращайся