АПЕЛЬСИН Состав: Корка, Мякоть, Косточки.
ЯЙЦО Состав: Белок, Желток.
АПЕЛЬСИНОВОЕ ЯЙЦО Состав: Корка, Желток, Косточки.
'Microsoft QBASIC 1.0
DATA 23.45,51.8,-6.3,18,-11.9,37.2,-4,19,31.4,-11.2
DIM m(1 TO 10) AS DOUBLE
CLS
k = 0
FOR i = 1 TO 10
READ m(i)
PRINT m(i); ' ';
IF m(i) > 0 THEN k = k + 1
NEXT i
PRINT
REDIM n(1 TO k)
j = 0
FOR i = 1 TO 10
IF m(i) > 0 THEN
j = j + 1
n(j) = SQR(m(i))
PRINT n(j); ' '
END IF
NEXT i
PRINT
<u><em>Тестовое решение</em></u>
23.45 51.8 -6.3 18 -11.9 37.2 -4 19 31.4 -11.2
4.84252 7.197222 4.24264 6.09918 4.358899 5.60357
#include <stdio.h>
int chislo(int a, int b) { if ( a > b ) return a; else return b;}
int main(){ int a,b,c,d;
printf("\n Óñëîâèå: Íàïèøèòå ïðîãðàììó ïîèñêà ìàêñèìàëüíîãî èç ÷åòûðåõ ÷èñåë ñ èñïîëüçîâàíèåì ôóíêöèè ïîèñêà áîëüøåãî èç äâóõ."); printf("\n\t Ââåäèòå 1 ÷èñëî -> "); scanf("%i",&a); printf("\n\t Ââåäèòå 2 ÷èñëî -> "); scanf("%i",&b); printf("\n\t Ââåäèòå 3 ÷èñëî -> "); scanf("%i",&c); printf("\n\t Ââåäèòå 4 ÷èñëî -> "); scanf("%i",&d);
printf ( "max=%i\n" , chislo(chislo(chislo(a,b),c),d));
return 0;}
Ответ 266
подробнее в файле первый столбец i, второй j третий s