Суббота, 18.11.2017, 09:23
Приветствую Вас Гость | RSS
Главная | Урок 37 | Регистрация | Вход
Меню сайта
Форма входа
Поиск
Опрос
Кто был на сайте?
Всего ответов: 55
Полезно

Управление по делам образования г.Челябинска

Учебно-методический центр г.Челябинска

Служба информационно-аналитического обеспечения Калининского района г.Челябинска

Олимпийский образовательный портал

Вход в Электронный журнал

Блог АС "Сетевой город.Образование"

Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0
Сайт заместителя директора по УВР
Тема: Основы объектно-ориентированного визуального программирования.

Проект Калькулятор

procedure TForm1.Button1Click (Sender: TObject);
var
a, b : integer ;
c: real ;
begin
a:=StrToInt ( Edit1.Text ) ;
b:=StrToInt ( Edit2.Text ) ;
c:=a+b;
Label3.Caption:= ’Ответ: ’+FloatToStr (c);
end.

Задание: Создать проект "Калькулятор"


Бесплатный хостинг uCozCopyright MyCorp © 2017