Delphi writeln
Автор Антон Тупиков задал вопрос в разделе Другие языки и технологии
У меня программа в Delphi: Console application и получил лучший ответ
Ответ от Jurijus Zaksas[гуру]
Вместо вот этого: readln(a); if a=4 then begin Writeln('Da'); end else Writeln('Net'); readln; k:=0; repeat readln(a); if a<>4 then writeln('Wrong'); inc(k); until a=4; dec(k); writeln('Right'); writeln('Wrong answers: ',k); readln;
Ответ от Николай[гуру]
1. Воспользуйтесь процедурами и функциями - это резко упростит труд и облегчит чтение и отладку программы 2. заведите переменную обнулите ее в начале в случае правильного ответа выполняйте inc(имя переменной);
1. Воспользуйтесь процедурами и функциями - это резко упростит труд и облегчит чтение и отладку программы 2. заведите переменную обнулите ее в начале в случае правильного ответа выполняйте inc(имя переменной);
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: У меня программа в Delphi: Console application
Delphi. Как удалить все пробелы внутри строки
{$apptype console}
uses
SysUtils;
var
s, r: String;
подробнее...
спросили в Delphi
Delphi String в LongInt
18 десятичных знаков поддерживает 64-битное целое. Вроде в Delfi это тип
подробнее...
Delphi String в LongInt
18 десятичных знаков поддерживает 64-битное целое. Вроде в Delfi это тип
подробнее...
что значит в Паскаль writeln('x=',x:8:5);
Учится надо было раньше.
Выдаст в консоль значение X, всего 8 знаков, из них 5 знаков после
подробнее...
спросили в Citroën
Помогите найти программу написанную в Delphi 7 "Шифрование текста по методу Цезаря с лозунгом (с ключивым словом)"
тестировался на Pascal ABC и Pascal Abc.NET) должно работать и в делфи, только нужно переобьявить
подробнее...
Помогите найти программу написанную в Delphi 7 "Шифрование текста по методу Цезаря с лозунгом (с ключивым словом)"
тестировался на Pascal ABC и Pascal Abc.NET) должно работать и в делфи, только нужно переобьявить
подробнее...
Вопрос по Delphi. Не так легко ка может показаться!!
var
time1,time2:string;
begin
{ TODO -oUser -cConsole Main : Insert code here }
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:
Delphi - как установить формат для числа real? Хочу, чтобы в числах всегда стояло 6 знаков после запятой.
> я нашел только команды для String
А других и нет. И быть не может в принципе.
спросили в ISDN Randomness
как делать эту задачу?? помогите плиииииииииз "Дан одномерный массив. Упорядочить его элементы по возрастанию." DElphi
var
v:array[1..100] of integer;
i,j,n,b:integer;
begin
randomize;
подробнее...
как делать эту задачу?? помогите плиииииииииз "Дан одномерный массив. Упорядочить его элементы по возрастанию." DElphi
var
v:array[1..100] of integer;
i,j,n,b:integer;
begin
randomize;
подробнее...
Как в delphi сохранить переменные в txt файл... Как в delphi сохранить переменные в txt файл?
SaveToFile() - посмотрите в справке про эту функцию. ну и наверное Вам ещё понадобиться цикл, что
подробнее...
подскажите пожалуйста, по Delphi 7, вопрос обычный, просто я не немогу понять в чем ошибка I/O error 105
f:textfile в переменных вроде писали!! !
и еще rewrite вместо
подробнее...
Язык программирования Delphi. Программа для расчета площади и периметра прямоугольника.
procedure TForm1.CalcButtonClick(Sender: TObject);
var a,b,c,d: real;
code: integer;
подробнее...
Дельфи. Запись из edit в файл
Только так:
var
T : Text;
procedure Save(Edit);
begin
WriteLn(T,
подробнее...
псевдографика в паскале/делфи помогите
Вот небольшой пример как вывести все символы на экран в консолном приложении Delphi
var
подробнее...