logo
Войти Регистрация Спроси ai-bota


артур613
22.01.2023 20:06

Лабораторная работа 2 проверка попадания точки в заданную область питон решите номер 5

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
samuray99
samuray99
19.05.2023 11:42
Напишите программу( pascal abc) которая вычисляет частное от целочисленного деления двух заданных целых чисел и выводит на экран монитора результат...
По5643
По5643
19.05.2023 11:42
Текст составлен с использованием алфавита мощностью 64 символа и состоит из 2 страниц...
Волвлчлчлч
Волвлчлчлч
19.05.2023 11:42
Паскаль. написать программу проверка знаний таблицы умножения. программа должна вывести 10 примеров и выставить процент знаний ученика: 100% отлично, 90%-80 % хорошо,...
sasha1948
sasha1948
17.11.2020 14:58
Составьте программу и запишите на одном из языков программирования . заданы три числа a,b,c.если с-нечетное положительное число ,то вывести на экран сумму чисел...
t4rka
t4rka
17.11.2020 14:58
Что такое величины ? операции над величинами....
арсенийпузырев
арсенийпузырев
05.11.2022 12:47
Гиперссылки. Урок 2 Определи формат текстового документа, который можно открыть как веб-страницу в браузере.НазадПроверить​...
qwweee
qwweee
29.03.2021 01:46
Брошюра содержит 16 страниц, на каждой из которых в среднем по 32 строки, содержащих 64 символов каждая. Сколько килобайт составляет информационный объём текстового...
lianochkaya14
lianochkaya14
10.06.2022 05:32
♥️НАПИШИТЕ ТВОРЧорческую РАБОТУ НА ТЕМУ ПОГИБЛА ДУША В МИРЕ ЖЕСТОКОСТИ (ПО СКАЗКЕ А. Н. ОСТРОВ КОГО СНЕГУРОЧКА ПРЯМ ОЧЕНЬ Всё отдам!...
Элаизааа
Элаизааа
02.11.2020 23:46
Найдите предложение с вводным словом. (Знаки препинания не расставлены). * 1)Между тем ребята долго не могли успокоиться. 2)Где именно можно прочитать об истории...
ApuCTokpaT1
ApuCTokpaT1
10.06.2022 05:32
Часть 3 (С) Дайте развернутый ответ. 18.Определите, к какому типу относится семейный бюджет семьи, если в семье из трех человек (отец, мать и сын школьник) совокупный...
Ответ:
millykot2003
16.10.2021 16:59
{ ответ дан на языке Pascal }
{         Вариант a         }
PROGRAM Solution(INPUT, OUTPUT);

VAR
  Str: STRING;
  Str1: STRING;
  Str2: STRING;
  Str3: STRING;
  TempStr: STRING;

BEGIN
  WRITE('Введите строку: ');
  READLN(Str);
  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));

  WRITELN(Str2 + Str3 + Str1);

END.

{         Вариант b         }
PROGRAM Solution(INPUT, OUTPUT);

VAR
  Str: STRING;
  Str1: STRING;
  Str2: STRING;
  Str3: STRING;
  TempStr: STRING;

BEGIN
  WRITE('Введите строку: ');
  READLN(Str);
  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));

  WRITELN(Str3 + Str1 + Str2);

END.
0,0(0 оценок)
Ответ:
nikitakozlav8niks
16.10.2021 16:59
{ ответ дан на языке Pascal }
{         Вариант a         }
PROGRAM Solution(INPUT, OUTPUT);

VAR
  Str: STRING;
  Str1: STRING;
  Str2: STRING;
  Str3: STRING;
  TempStr: STRING;

BEGIN
  WRITE('Введите строку: ');
  READLN(Str);
  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));

  WRITELN(Str2 + Str3 + Str1);

END.

{         Вариант b         }
PROGRAM Solution(INPUT, OUTPUT);

VAR
  Str: STRING;
  Str1: STRING;
  Str2: STRING;
  Str3: STRING;
  TempStr: STRING;

BEGIN
  WRITE('Введите строку: ');
  READLN(Str);
  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));

  WRITELN(Str3 + Str1 + Str2);

END.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота