Есть ответ 👍

«История Операционных Систем для персонального компьютера».
Нужно сравнить ныне существующие и уже отжившие свое ОС,
выделить отличия и найти сходства. (ответ должен быть объёмным) 50 баллов за ответ

128
358
Посмотреть ответы 1

Ответы на вопрос:

pudgenamide
4,4(61 оценок)

uses crt; var a,s: integer; begin clrscr; repeatwrite('введите трехзначное число a='); readln(a); until(a> =100)and(a< =999); s: =0; while a> 0do   begin   s: =s+sqr(a mod10)*(a mod10);   a: =a div10;   end; if a*a=s*s*s thenwrite('квадрат числа=сумме кубов его цифр')elsewrite('квадрат числа< > сумме кубов его цифр'); readlnend.

 

самое легкое что я придумал

Популярно: Информатика