ПОМОГИТЕ ПОЖЛСТ!СРОЧНО!ЯЗЫК ПРОГРАМИРОВАНИЯ-PASCAL!!!

0 голосов
82 просмотров

ПОМОГИТЕ ПОЖЛСТ!СРОЧНО!ЯЗЫК ПРОГРАМИРОВАНИЯ-PASCAL!!!


image
image

Информатика (12 баллов) | 82 просмотров
0

Язык программирования?

0

паскаль

0

прошу!очень срочно надо!

0

какие это задачи в задачнике?

0

if 6

0

и for 4

Дан 1 ответ
0 голосов

// Попробуйте, если что не так пишите

//If6

uses PT4;

begin

 Task('If6');

 var (a, b) := ReadReal2();

 if a > b then

   Write(a)

 else

   Write(b)

end.

//-------------------------------

//For4;

uses PT4;

begin

 Task('For4');

 var Price := ReadReal();

 for var i := 1 to 10 do

   Print(i * Price)

end.

(2.5k баллов)
0

Если захотите сами вводить числа и стоимость, закомментируйте строчки uses PT4 и Task('If6')/Task('For4') в обоих задачах, т.е. поставьте в начале тех строк такое //