- 1
Функция "чтения" служит для ознакомления с работой. Разметка, таблицы и картинки документа могут отображаться неверно или не в полном объёме!
Контрольная работа
Составьте программу, определяющую является ли вводимое с клавиатуры целое число
положительным или отрицательным.
Текст программы:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
private
public
end;
var
Form1: TForm1;
x: longint;
implementation
label start,fin;
begin
start:
write('Vvedite celoe chislo =');
readln(x);
if x>0 then begin
writeln('Dannoe chislo >0');goto fin; end;
if x
- 1
Похожие работы
Тема: Программирование: работа с текстом |
Предмет/Тип: Информационное обеспечение, программирование (Курсовая работа (т)) |
Тема: Работа микроконтроллера и его программирование |
Предмет/Тип: Другое (Контрольная работа) |
Тема: Работа микроконтроллера и его программирование |
Предмет/Тип: Информатика, ВТ, телекоммуникации (Контрольная работа) |
Тема: Курсовая работа программирование на Pascal |
Предмет/Тип: Информатика, ВТ, телекоммуникации (Реферат) |
Тема: Работа По теме: «Целочисленное программирование» |
Предмет/Тип: Другое (Реферат) |
Интересная статья: Быстрое написание курсовой работы