Решите пожалуйста! Даны три числа, если первое число положительно, то два других…

Question

41

Решите пожалуйста! Даны три числа, если первое число положительно, то два других уменьшить в два раза, в противном случае увеличить на 3. В фри паскале нана английском языке.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

dinos1966 · Accepted Answer

78

dinos1966

01 марта 2024

var a: array [1… 100] of real; i,j,n: integer; Begin n: =3; for i: =1 to n do read (a[i]); if a[1]>0 then for i: =2 to n do a[i]: =a[i]/2; else for i: =2 to n do a[i]: =a[i]+3; for i: =1 to n do write (a[i],'); End. Универсальный вариант сведенный к 3 элементам

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: