Проверить, верно ли утверждение, что введенное целое число делится на 3 без остатка

@jack the ripper · Регистрация: 19.01.2011

Author24 — интернет-сервис помощи студентам

Ветвление.
1). Составьте программу, проверяющую верно ли утверждение что введенное вами целое число делится на 3 без остатка.
2). Известны площадь круга S1 и площадь квадрата S2. Определить поместится ли круг в квадрат.
3). С клавиатуры вводится шестизначный номер трамвайного билета. Определить является ли билет счастливым.

@Gelo · 02.06.2011, 21:19

Первая

Delphi

procedure TForm1.Button1Click(Sender: TObject);
begin
if StrToInt(Edit1.Text) mod 3 = 0 then showmessage('Делится на 3 без остатка')
else showmessage('Не делится на 3 без остатка');
end;

@Gelo · 02.06.2011, 21:26

Вторая

Delphi

procedure TForm1.Button1Click(Sender: TObject);
begin
if StrToFloat(Edit1.Text)/(2*pi)<=sqrt(StrToFloat(Edit2.Text)/2) then showmessage('Âïèñûâåòñÿ')
else showmessage('Íå âïèñûâàåòñÿ');
end;

@Gelo · 02.06.2011, 21:54

Третья:

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s:=Edit1.Text;
if StrToInt(s[1])+StrToInt(s[2])+StrToInt(s[3])=StrToInt(s[4])+StrToInt(s[5])+StrToInt(s[6]) then showmessage('Счастливый')
else showmessage('Обычный');
end;

Новые блоги и статьи
Преобразование полей (элементов управления содержимым) в обычный текст РоΜа 23.01.2025 Возникла необходимость преобразовать поля в текст (те, что на вкладке разработчик добавляются) . Помучившись родил следующее: Sub ПоляВТекст() Преобразует все поля в текст (даты, текст,. . .	Как проверить существование директории в скрипте Bash bt_guru 23.01.2025 При разработке скриптов Bash одной из ключевых задач является корректная работа с файловой системой, где особое место занимает проверка существования директорий. Эта операция становится критически. . .	Как работают срезы (slice) в Python bytestream 23.01.2025 Python предоставляет разработчикам мощный и гибкий инструмент для работы с последовательностями данных - срезы (slices). Эта функциональность позволяет извлекать, модифицировать и управлять. . .	Как удалить подмодуль (submodule) в Git bytestream 23.01.2025 При работе с крупными проектами в системе контроля версий Git разработчики часто сталкиваются с необходимостью управления зависимостями и внешними компонентами. Подмодули (submodules) представляют. . .	В чем разница между @staticmethod и @classmethod в Python. Декораторы методов bytestream 23.01.2025 В Python декораторы методов представляют собой мощный инструмент, позволяющий модифицировать поведение функций и методов без изменения их исходного кода. Эта возможность является одной из. . .	Как преобразовать InputStream в String в Java bytestream 23.01.2025 В мире Java-разработки работа с потоками данных является одной из ключевых операций при создании современных приложений. InputStream, как фундаментальный класс для обработки входных потоков данных,. . .
Как обновить форк (ответвление) репозитория в Git bytestream 23.01.2025 Одним из наиболее мощных инструментов Git для организации совместной работы является механизм форкинга репозиториев, который позволяет создавать независимые копии проектов для дальнейшей разработки. . . .	Как работает async/await в C#. Асинхронное программирование в .NET bytestream 23.01.2025 Введение в асинхронное программирование Асинхронное программирование представляет собой важнейшую концепцию современной разработки программного обеспечения, особенно в контексте создания. . .	КуМир: полное руководство bytestream 23.01.2025 Введение в КуМир: история создания и назначение КуМир (Комплект Учебных МИров) представляет собой образовательную среду программирования, которая была создана для обучения основам алгоритмизации и. . .	Что такое OLAP. Где и как использовать многомерный анализ данных bytestream 23.01.2025 Введение в OLAP-технологии В современном мире бизнес-аналитика и обработка больших массивов данных играют ключевую роль в принятии стратегических решений. Организации накапливают огромные объемы. . .	MongoDB: что это, для чего нужна и как использовать bytestream 23.01.2025 Введение в MongoDB: современная документоориентированная СУБД В современном мире разработки программного обеспечения выбор правильной системы управления базами данных является критически важным. . .	Как использовать закрытый ключ шифрования в Git. Шифрование в Git bytestream 23.01.2025 Установка и настройка закрытых ключей в Git предоставляет дополнительный уровень безопасности для работы с репозиториями. Для начала необходимо создать пару ключей, обычно это осуществляется с. . .

@jack the ripper 1 / 1 / 0 Регистрация: 19.01.2011 Сообщений: 31
		1
	Проверить, верно ли утверждение, что введенное целое число делится на 3 без остатка 02.06.2011, 21:10. Показов 2218. Ответов 3 Метки нет (Все метки) Ветвление. 1). Составьте программу, проверяющую верно ли утверждение что введенное вами целое число делится на 3 без остатка. 2). Известны площадь круга S1 и площадь квадрата S2. Определить поместится ли круг в квадрат. 3). С клавиатуры вводится шестизначный номер трамвайного билета. Определить является ли билет счастливым. 0

	02.06.2011, 21:54