Паскаль. напишите программу, которая по последней цифре числа определяет последнюю цифру квадрата этого числа
kirill885
1
15.08.2019 05:10
1
Другие вопросы по теме Информатика
dgony2003
27.01.2021 20:13
lauraumirzhan55
27.01.2021 20:11
Denis1930
27.01.2021 20:11
vadimbukov
27.01.2021 20:10
ChocoPie12
27.01.2021 20:08
vika20022003
27.01.2021 20:04
Дженнет2001
27.01.2021 20:04
Valerykh123
27.01.2021 20:03
shijoatova48
27.01.2021 20:02
Популярные вопросы
- Место в обществе Занятие Малый князь Простой народ БЫСТРЕЕ...
3 - Основні центри виробництва меблів...
2 - Функция задана уравнениемy=-x^2-4x+12...(все на фото) ...
2 - Дано арифметичну прогресію: 4,2; 3,4; 2,6; ... Починаючи з якого номера...
1 - Запиши в виде десятичной дроби:...
1 - Каким было географическое положение Галицко-Волынского княжества? Опишите...
3 - Образ лікаря у романі М.Булгакова «Записки юного лікаря».Твір за схемою...
2 - Образовать от данных прилагательных наречия. Мужественный – Дружественный...
1 - [5] Оқылым2-тапсырма. Мәтінді оқы. Мәтін бойынша тапсырмаларды орында.Ұшақ...
3 - Дана арифметическая прогрессия 7; 12; 17; ... . Какое число стоит в этой...
1
begin
write ('введите число -> ');
readln (a);
a:=a mod 10;
b:=(a*a) mod 10;
writeln ('последняя цифра квадрата числа -> ',b);
end.
begin
write('Число: ');
readLn(i);
i := i mod 10;
writeLn('Цифра квадрата = ',
sqr(i) mod 10);
end.