Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
natochka2001
21.06.2020 14:28 •
Информатика
1.дано целое двузначное число. написать программу которая находит квадрат суммы его цифр. pascal
Показать ответ
Ответ:
шунгит
01.10.2020 16:30
Program qwerty;
var a, b, c, d:integer;
begin
writeln ('Нахождение квадрата суммы цифр двузначного числа');
writeln ('Введите число ');
readln (a);
b:= a mod 10;
a:= a div 10;
c:= a mod 10;
a:= a div 10;
d:= sqr (b + c);
writeln ('ответ: ', d)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Kristia03
24.06.2021 05:09
Водном районе, в одном доме, даже в одном подъезде живут учителя климов, михеенко, ушаков, жебин. один из них учитель , другой – информатики, третий – рисования, а четвертый...
dashashirobokova
01.06.2022 00:44
Определите количество информации в своей фамилии при условии что для кодирования используется 32 символьный алфавит. фамилия коршунова...
idkcjdosjn
07.06.2022 13:33
Постройте графическую модель (график) петиной успеваемости за год (по четвертям) для следующих предметов: , , , . петины оценки: – 5 4 4 5 – 3 4 3 4 – 4 4 3 4 – 3 3 4...
snizhanadob
26.07.2021 01:31
Информационное сообщение объемом 300 бит содержит 100 символов какая мощность алфавита...
ghtrwsd18
23.10.2021 17:42
Расстояние от екатиринбурга до челябинска равно примерно 202 км. чему равна длина отрезка,соединяющего эти города,на карте с масштабом 1: 2000000?...
seniorchi4kan
23.10.2021 17:42
Три свидетеля дорожного происшествия сообщили сведения о скрывшемся нарушителе. эдгар утверждает, что тот был на красном«peugeot», вадим сказал, что нарушитель уехал на...
Tanya11011
23.10.2021 17:42
Расстояние между двумя машина проехала за 6 часов со скоростью 80 км в час обратный путь она проехала за 8 часов на сколько уменьшилась её скорость...
mamrykovaksun
06.03.2021 06:38
Может ли человек обойтись в своей жизни без контактов с другими людьми?...
pud0303
06.03.2021 06:38
Ришате уравнение |4x+3|=3; |x-8|=5...
Lololiplolpjvfhsbf
06.03.2021 06:38
Известно, что tg a+ ctg a=3. найти tg^2 a+ ctg^2a. только сами...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a, b, c, d:integer;
begin
writeln ('Нахождение квадрата суммы цифр двузначного числа');
writeln ('Введите число ');
readln (a);
b:= a mod 10;
a:= a div 10;
c:= a mod 10;
a:= a div 10;
d:= sqr (b + c);
writeln ('ответ: ', d)
end.