Windows.Forms - создание приложения

@Svismi · Регистрация: 27.06.2018

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

было задание,нужно было написать программу, которая отвечала на вопрос без помощи массивов. Теперь надо создать приложение на основе кода

Pascal

var
x1,x,i,a:integer;
begin
write('первое число не самое маленькое?');
write('введите количество чисел:');
readln(a);
write('введите первое число:');
readln(x1);
write('введите остальные числа:');
i:=1;
readln(x);
       while(i<=a-2)and (x1<x) do begin
       readln(x);
       i:=i+1;             
       end;
if i=a-1 then write('no')
else write('yes');
end.

@Sun Serega · 18.03.2019, 14:57

При чём тут Windows.Forms? Типо надо сделать форму с полями ввода и вывода? А не слишком ли большой прыжок с того кода что вы дали?

@Sun Serega 2308 / 1419 / 516 Регистрация: 07.04.2017 Сообщений: 4,721
	18.03.2019, 14:57	2
	При чём тут Windows.Forms? Типо надо сделать форму с полями ввода и вывода? А не слишком ли большой прыжок с того кода что вы дали? 0