Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
DeNiSNoNs
15.12.2020 10:57 •
Информатика
Введите с клавиатуры число х.определите, является ли данное число дробным. пример ввода: 3.5 пример вывода: число дробное
Показать ответ
Ответ:
валера336
20.06.2020 09:40
Var s:string; i,k:integer;
Begin
readln(s);
i:=1;
while (s[i]<>'.')and(i<>length(s)) do
i:=i+1;
delete(s,1,i);
k:=0;
for i:=1 to length(s) do
if s[i]<>'0' then k:=1;
if k=0 then writeln('Число целое')
else writeln('Число дробное');
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
sashaShelsy
29.05.2020 15:07
Представьте имеющуюся информацию в форме графа и ответьте на следующие вопросы. 1) Сколько внуков у Решко Д. А.? 2) Информация о скольких супружеских парах представлена...
RILIR
02.06.2022 09:54
Как можно обойти localhost с Бэкдор использоваф LocalStorge...
Миша20072007
07.05.2023 09:39
Сложение и вычитание чисел, представленных в коде прямого замещения (двоично-десятичном коде). Вторую операцию сложения выполнить с предварительной коррекцией 1) 548+6372)157+763...
bili0909
21.04.2020 08:35
8 класс Мцыри ! Развёрнутый ответ ( 5 - 8 предложений ) в виде связанного текста. Что отстаивает в своей исповеди Мцыри?...
ytytuty
29.03.2021 06:29
Поставь глаголы в неопределённую форму. Запиши в поле ответа получившиеся слова.Берегут —Заметят —Разучила —Запишет —Слышали —Читают —Улыбаемся —Выучу —...
antuarmenskaya
23.01.2023 05:59
СОЛЖЕНИЦЫН КОЛОКОЛ УГЛИЧА составить план к этому рассказу...
Адриана1111111
23.12.2020 07:27
Подчеркни сказуемое, определи его вид: 1) Молодой ученый прибыл в русскую столицу и решил остаться в России. Он готов был верно и преданно служить ей. Даль стремился всю...
persikinha
04.11.2020 02:35
Каждый день в одно и тоже время жители на планете Неверкино бросают монетку, чтобы определить будет ли дождь или нет. если выпадет орёл дождь пойдёт, если решка, то нет....
ннннн43
23.09.2021 12:29
При определенных условиях реакция хлороводорода с кислородом является обратимой. Проанализируйте утверждения и укажите правильные: І. Реакция экзотермическая ІІ. Увеличение...
Мижоп
03.10.2021 01:26
1. Какие поэтические образы выразить особый накал патриотического чувства лирического героя? 2. Как и с какой целью в стихотворении используется прием антитезы? 3. Чем...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
readln(s);
i:=1;
while (s[i]<>'.')and(i<>length(s)) do
i:=i+1;
delete(s,1,i);
k:=0;
for i:=1 to length(s) do
if s[i]<>'0' then k:=1;
if k=0 then writeln('Число целое')
else writeln('Число дробное');
End.