Презентация по информатике Процедуры и функции

Добрый день

Будь сегодня на уроке …. все понятно есть вопросы не понятно

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

ПРОЦЕДУРЫ И ФУНКЦИИ. Практическая работа №2

ПРОЦЕДУРЫ И ФУНКЦИИ procedure TForm1.Button1Click(Sender: TObject), var s,t:integer, v:real, begin s:=StrToInt(Edit1.Text), t:=StrToInt(Edit2.Text), v:=s/t, label4.Caption:=Скорость= ‘+ +floattostrf (v, fffixed, 4, 2) + м/с, end,

procedure TForm1.Button1Click(Sender: TObject), {обработка события «нажать на кнопку» с помощью процедуры} Var s,t:integer, v:real, {описание локальных переменных, встречающихся в процедуре и их типов} begin s:=StrToInt(Edit1.Text), {перевод строковой величины в целое число} t:=StrToInt(Edit2.Text), v:=s/t, label4.Caption:=Скорость= ‘+ +floattostrf (v, fffixed, 4, 2) + м/с, {перевод дробного числа в строку для вывода на компонент label4} end,

Лестница успеха