Регистрация Спросить otvet5GPT
max438073
28.01.2022 15:22
Информатика
Есть ответ 👍

На языке программирования pascal составить программу, которая проверяет, является ли введенное с клавиатуры число простым или нет (т. е. число делится только на 1 и на само себя без остатка) (число 354)

290
481
Посмотреть ответы 2

Ответы на вопрос:

PandaNyya
PandaNyya
4,8(12 оценок)

function isprime(n: integer): boolean;

var res: boolean;

i: integer;

begin

if n> 1 then res: =true

else res: =false;

for i: =2 to n div 2 do

if n mod i = 0 then

begin

res: =false;

break;

end;

isprime: =res;

end;

var n: integer;

begin

writeln('введите целое число: n = ');

readln(n);

write(isprime(n));

readln;

end.

arina68668
arina68668
4,5(68 оценок)
Ятак понимаю, что есть форма и на ней два edit с текстом. кидай на форму батон=кнопку button1 и щёлкни по ней два раза. попадёшь в событие button1.onclick. объяви переменную s: string; ну и в самом событии (после begin) пиши s: =edit1.text; edit1.text: =edit2.text; edit2.text: =s; вот,  собственно, и всё.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS