ИНФ 8 классы), я ничего не понимаю :(((
3. Написать программы в текстовом документе:
А) Дано целое число. Если оно является неотрицательным, то увеличить его
в 3 раза, а иначе прибавить к нему 15. Вывести полученное число.
Б) Вводится целое трехзначное число. Определить является ли оно
палиндромом (палиндром - число, буквосочетание, слово или текст,
одинаково читающееся в обоих направлениях), например, 121 – палиндром.
Т.е. задача сводится к проверке равенства первой и последней цифры числа.
Если цифры равны, то число является палиндромом, иначе это не палиндром.
Проверить программы в Паскале.
203
343
Ответы на вопрос:
Program chisla;
Uses Crt;
Var a:integer;
Begin;
Writeln ('Введите любое целое число');
Readln a;
If a>0 then a:=a+1 else a:=a-2;
Writeln ('a=',a);
End
Объяснение:
Один из вариантов
Популярно: Информатика
-
Камелек05.06.2021 16:16
-
катя508505.06.2023 06:00
-
AfinaBi27.08.2022 15:17
-
Messidarcelona0528.03.2022 00:03
-
sakds28.09.2021 22:02
-
NoAl320.05.2023 16:27
-
nsotskova02.10.2020 06:01
-
Сурикатина16.01.2020 19:59
-
Misha3107198631.10.2020 17:23
-
sisy09.07.2020 18:28