Воскресенье, 19.05.2024, 03:32
Приветствую Вас Гость | RSS
Главная | Урок 37 | Регистрация | Вход
Меню сайта
Форма входа
Поиск
Опрос
В каких социальных сетях вы предпочитаете общаться?
Результаты | Архив опросов
Всего ответов: 30
Полезно

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

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

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

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

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

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

Статистика
Онлайн всего: 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 © 2024