С Новым годом! Форум программистов, компьютерный форум, киберфорум
Другие языки программирования
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Программирование Shell > нужно вывести две команды одной строкой Здравия! Ищу, никак не могу найти способ вывести в файл текущую дату и пояснение через есно одной строкой. { date; echo 'произошло событие'; } >файл результат Текущая дата произошло событие. Мне необходимо Текущая дата произошло событие. Подскажите? https://www.cyberforum.ru/ other-lang/ thread2106930.html Программирование Язык O/O++
Скучное предисловие: Год назад, скажи мне кто, что я вдруг займусь новым браузером ОС языком программирования — покрутил бы виском, ибо считал, что всё что нужно уже в принципе есть. Полтора года назад здоровье вынудило покинуть полноценную работу, и я решил потратить время на восстановление утраченных и недополученных знаний по нативному программированию, которое в моём случае было жутко...
Программирование Задание по методам анализа данных (Statgraphics или Statistica Statsoft) https://www.cyberforum.ru/ other-lang/ thread2082781.html
Тема. Представление и преобразование числовых последовательностей. Сглаживание. Параллельные и блуждающие схематические диаграммы. Силуэты выборок. Улучшение сглаживания. Задание. Выполнить сглаживание для заданной выборки методом скользящих медиан и методом средних О. Гана. Повторить хотя бы дважды. Для реализации соответствующих действий использовать комплекс программ Statgraphics или...
Программирование COBOL Ищу следующие Коболы https://www.cyberforum.ru/ other-lang/ thread2082569.html
Доброго дня, уважаемые форумчане! Неспешно ищу следующие продукты: 1. Fujitsu PowerCOBOL V3.0 Freeware - ссылки в темах на этом форуме уже не работают 2. Visual COBOL Personal Edition 2.3 - тоже самое, ссылки пропали 3. MicroFocus Visual Objects COBOL for Windows 95 4. MicroFocus NetExpress 5.1 Personal Edition - есть упоминание и о таким. Это то же самое, что и 2? 5. Fujitsu NetCobol for...
Программирование LATEX скачать
Добрый день. Подскажите, уважаемые, где можно скачать тех/латех? Вроде должен быть в свободном доступе, но добыть его из недр интернета не смогла( На оф сайте и с ссылок учебника Коваленко Чеботаева нашла обеспечение, тексты и прочее, но самой программы нет( может, не туда смотрю? укажите , пожалуста )))
Программирование Tcl - создание списка из случайных чисел https://www.cyberforum.ru/ other-lang/ thread2039041.html
Данный код должен создавать список из случайных чисел размерностью a, без 0, без повторов, без лакун ... proc Vvod {a} { global t puts stdout { Vvedite a =} set a set t } proc ldelete_val {list val} { set ix
Программирование Язык программирования simit https://www.cyberforum.ru/ other-lang/ thread2038079.html
Стоит ли начинать учить не так давно разработанный язык simit? Есть ли для него уже среды программирования и какие-нибудь учебные пособия?
Программирование Математика, физика
Скорее всего я определился уже... Но поскольку я спал с 6го по 9ый... то подскажите где всё это учить? Где нагнать физику и математику... По физике не знаю практически ничего... По мату - скоро к членам подойду... Говорят что 1 год школьной программы можно нагнать за пару недель... Где? Можно мне полезные ресурсы и тд... Благодарю
Программирование Геймдев. ПО. Веб Что учить? Подскажите пожалуйста. Начал учить C++, но не знаю с чего начать. Уже вроде как есть C++ 17, но в основном все учебные материалы на C++ 11... Вообщем, у меня такая каша сейчас, Python, C++ учить, или пойти изучать веб... От веба( а точнее от джс немного тошнит, мне он не приятен и тд). Хотел в игры пойти...да правда комп древненький...Pentium G620, Palit GT520, 2 GB ddr3... Что для... https://www.cyberforum.ru/ other-lang/ thread2037960.html Программирование Релиз gnuCobol 2.2 Вышла версия компилятор gnuCobol за номером 2.2. Исходники для сборки берем тут https://sourceforge.net/projects/open-cobol/files/gnu-cobol/2.2/ Вот перечень некоторых изменений: GnuCOBOL 2.2 released (20170906) * Move to GPL/LGPL 3 https://www.cyberforum.ru/ other-lang/ thread2037262.html
Программирование R, Вывод строк с максимальным значением Temp
maxTemp_func <- function(days) { Myframe <- as.data.frame(airquality) l <- list() x <- 1 while (x <= days) { NewData <- Myframe == max(Myframe$Temp),] mydata <- c("Month->", head(NewData], 1), "Day->", head(NewData], 1), "Temperature->", head(NewData], 1)) l] <- mydata Myframe <- Myframe
Программирование Выбор языка программирования https://www.cyberforum.ru/ other-lang/ thread2035331.html
Добрый день, посетители форума. Мой путь в программирование начался 2 года назад, но учить начал нормально только в этом году. Сначала хотел пойти в веб ,выучил HTML, CSS, хотел переходить на JS, но честно сказать - от него тошнило, осталось только учить PHP, но думал, что поскольку JS не знаю, то в веб пути нет. Веб выбрал исключительно для заработка, т.к. не очень с деньгами в семье, пишу с ПК,...
0 / 0 / 0
Регистрация: 04.05.2017
Сообщений: 58
0

Перевод из паскаля в кумир - Программирование - Ответ 11663104

29.10.2017, 13:02. Показов 5027. Ответов 1
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите перевести уже готовую программу из паскаля в кумир.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
var
  a, b, i, ii, fl, j: integer;
 
function sost(k: word): boolean;
var
  i: integer;
begin
  sost := false; 
  for i := 2 to k - 1 do 
    if k mod i = 0 then sost := true; 
end;
 
begin
  write('Введите M='); 
  read(a); 
  write('Введите N='); 
  read(b); 
  fl := 0; 
  if a > b then j := b else j := a; 
  for i := j downto 1 do 
    if (a mod i = 0) and (b mod i = 0) and sost(i) then begin
      ii := i; 
      
      
      fl := 1; 
    end;
  if fl = 0 then writeln('Нет такого числа') 
  else 
    writeln('NOD: ', ii); 
end.


Вернуться к обсуждению:
Перевод из паскаля в кумир Программирование
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.10.2017, 13:02
Готовые ответы и решения:

Перевод с паскаля на кумир №2
Еще раз приветствую всех. Помогите пожалуйста перевести код паскаля на КУМИР. uses crt; const...

Перевести с паскаля на кумир
Привет всем. Помогите пожалуйста перевести код с паскаля на кумир. 1 Задача: var...

Как перевести из паскаля в кумир?
const n=5; type mas=array of integer; var a:mas; i: integer; k:real;...

Перевод с Паскаля на КуМир
var st: string; i: integer; begin readln(st); for i:=1 to length(st) do if st =...

1
29.10.2017, 13:02
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.10.2017, 13:02
Помогаю со студенческими работами здесь

Перевод из паскаля в кумир
Помогите перевести на кумир, пожалуйста! program E6; var a, b: integer; begin write...

Перевод из Паскаля в Кумир
Var i:integer; begin writeln(Сошли с дистанции машины); for i:=1 to 17 do if i mod 2 = 0 then...

Перевод с Паскаля на Кумир - программирование
var a : array of integer ; n,i,k:integer; begin randomize; write('Введите количество...

Перевести из паскаля в кумир
var i, n: integer; s: real; begin write('n = '); read(n); s := 0; for i :=...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru