Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.83/6:

UrTak

0 / 0 / 0

Регистрация: 02.11.2020

Сообщений: 19

Нарисовать блок-схему для кода

28.05.2021, 00:01. Показов 1159. Ответов 3

Метки Pascal (Паскаль), pascal abc (Все метки)

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

Pascal
1
2
3
4
5
6
7
8
9
10
11
Program z2;
var s:string;
    i:byte;
begin
    write('text: ');readln(s);
    i:=Length(s);
    while s[i]<>',' do
     dec(i);
    writeln(i);
    readln;
end.

Лучшие ответы (1)

Сообщение: #15531642

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

28.05.2021, 00:01

Ответы с готовыми решениями:

Написать программы для сортировки массива по возрастанию методом выборки и нарисовать блок-схему
Написать программы для сортировки массива по возрастанию методом выборки и нарисовать блок-схему.

Нарисовать блок-схему
uses crt; var s:string; i:integer; f:text; begin assign(f,'lab16.pas'); reset(f); while not eof(f) do begin readln(f,s);

Нарисовать блок-схему
Помогите нарисовать блок схему uses crt; type Tmas=array of integer; procedure Vvod(var n:byte;var m:Tmas;c:char); var i:byte; ...

@ZX Spectrum-128 6812 / 4568 / 4820 Регистрация: 05.06.2014 Сообщений: 22,434
	28.05.2021, 08:55
	https://www.softsalad.ru/softw... y/fceditor 0

@UrTak 0 / 0 / 0 Регистрация: 02.11.2020 Сообщений: 19
	29.05.2021, 12:08 [ТС]
	Не работает. ТЕМА ЕЩЁ В СИЛЕ. 0

ZX Spectrum-128

6812 / 4568 / 4820

Регистрация: 05.06.2014

Сообщений: 22,434

29.05.2021, 17:47

Сообщение было отмечено UrTak как решение

Решение

Сообщение от UrTak

Не работает.

Ню-ню

Миниатюры

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

29.05.2021, 17:47

Помогаю со студенческими работами здесь

Нарисовать блок-схему
uses graphABC; function F1(x:real):real; begin F1:=x*cos(2*x); end; function F2(x:real):real; begin F2:=sqrt(x*x+2); end; ...

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

Нарисовать блок-схему
Написать программу вычисления суммы S=1+2+3+4+5+6. Нарисовать блок-схему. Программу я уже написал, но никак не могу понять как рисовать...

Блок схему поспособствуйте нарисовать
const mmax = 10; nmax = 10; var a:array of integer; b:array of integer; n,m,i,j,k,c: integer; BEGIN n:= 11;

Нарисовать блок-схему по коду
program massive; uses crt; var arr: array of integer; n, i, min, max, buf: integer; begin writeln('Программа предназначена...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а привычная функция main(). . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/

Наверх